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COPYRISHT 1781 LIJID6ER ROECKRATH, AACHEN 

ALLE RECHTE, SQHHL DER TEILHEISEN OUR VDLLSTAE)nJ6EH rOTOflECHANISCttEN REPRgSUKTlMp AIS AUCH SER UEBER- 
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INHALTSVERlEICmil 1 
ROH-LISTIM 4 

mm VERSIEWEH US 

RM-URESSEH tl9 

I/a-AHESSEN IH 

UNTERPRDSRAIME U* 

BASIC-ANHEI5UHEEM UND FUtJKTlOHEH 18 

AUFZEICHHUWSFMHATE AUF CASSETTE IN 

UNIERSCHIECE m VI5E0-EENIE ***"*tS 



ttmitttttttit 

I RWt-LIETIW t 

tttmmtiitti 

MS ftOfl-LlSTIW 15T EIH V(H1STAEWI6ES, filSASSEHBLIERTES UHD KmKMTIERTES LlSTINfi KS LEVEL-2-8ASIC-IHTEI)raeTERS. 
ZUH LEICHTEREN VERSTKHIS SEIEH HIER EM PMfi VERElHBAflUHBEN 6ETfiDFFEN: 

ZAHLEN IH KIHMEHTM SIM), KENH SIE HICH1 VON EINEfl 'D' 6EF0L6T KRDEN, HEIAKZIHAL. EIHE AUSNAHHE BILKN FLIESS- 
KOHHAKOtlSTAHTEH UNB ZEniM6ASE)l, DIE IHHER KZIHAL AH6E6EKH SIND. 

NIT i 1ST Kl SER ARITHHETIK MS IH RM-LISTIW ERLAEUTERTE RE61STER FUER UERTE JEDEN TYPS SEr^IHT. dlT Y SIHO KI ARJTHHETIK 
EIIFACWR eEHMIieKElT DIE I^BISTER B,C,B,E (B<E1P, C-flSI, BE=LSI> IMD SOKST DAS IH AM-LISTIMG ERLAEUERTE REGISTER SEr^IKT. 

KM) Vn EINEH K6ISTER DDER EINER AHDEREN 6RQESSE EIH SESTIffilTES BIT GEKIHT 1ST, SO 1ST DIES DURCH EINE MeEHAENGTE 
ZIFFER &EKENNZEIQWT. 

FLieSSKOnHAWRTE NERDEN VDH LE^L-2-BASIC IfflER IN F0L6EHDER FQRH ABSESPEICHERTi 

ZAM. ' (UNTISSE t 2 tl EXP HIT 0.3 <= HAHTISSE < 1 

HE HMTISSE 1ST 24 BIT LM6, WBEI DAS ERSTE BIT NICHT HIT AB6ESPEIC1KRT tlIRD, BA ES innER 1 1ST. AN SEINE STELLE MIRS 

DAS VDRZEICHEH BER HANTISSE BESETZT. 

KR EIPON^IT HIRB IMCR HIT EIKN OFFSET VCW 80 AKESPEICHERT, DE8 IH KDHHENTAR ENTFERNT WIRBE. 

BEISPIELEt 0.5 « 0.5 t 2 tt -> EXP = BO, H = 00 00 00 

-4 - -0.5 t 2 M 3 "> EIP = 93, H = 90 00 00 

-0.25 ' -0.5 I 2 » -I ~> EIP « 7F, H ■ 80 00 00 

KI DEH HIT U> 6EKEIMZEICHKTEH WTERPROSRAHHEN, 1ST IN BER KLAflNER AHSEGEBEH, KLCHE REGISTER VERAEHDERT UERDEH. 

BIE lIKIReeiSTER UHD BER ZWITREGISTERSATZ TAIKHEH MIGHT AUF, DA SIE HIE VERAEWIERT MERUH. 

1ST EIH SPEZIEILER HERT 6EHAHNT, SO ERHAELT BAS RE6I3TER HACH JEDEH UP-AUFRUF DIESEN HERT. HL ' P DEDEUTET, DASS 

DAS HL-REBISTER ALS PDIHTER ALF DEH PROSRAMTEIT BIENT, DER BEI FEHtTSCHRElTEHDER PRD&RAHNAUSFUEHRUNG EKTSPRECHEHD NACHfiE- 

STaiT HIRB. 

IMTEfi I 6ZII. SIHD BIE PUAHETER AUFGELISTET, DIE AH DAS IMTERPROGRANH UEKRSEDEN HERDEH HUESSEN BZU, BIE ES KEIN 

RUEKSPRUHG UEBERGIBT. 



RESET-AORESSEi SYSTEfllHlTIALISIERUM 

Omn DI {INTERRUPT SPERREN 

OKI tf lOR A ;A'0 (ZUH ZURUECKSETZEH VOH PORT FF) 

0002 C3 74 0& JP 0A74 fHEITER BEI 0i74 

0003 C} 00 40 JP_ 4000 ;SPItUH6 tIEIER RAN-VEKTOR 4000 HACK 1C9& 

RST 08 

0008 C3 00 40 JP ___ 4000 |SPfitlNG UIER RM-VEKTOR 4000 MCH ICM 

UP HERE IKL) 

ERRITTELT STAND KS PC 

I:/ 

OiHL=ZEI6ER AtlF DEN AUFRUF FOLKIKE DYTE 

OOOB El POP HL }RtICK8PIUNURESX MCH HL 

OOOC E9 JP (HL) iRUECKSPRIJW 

OOOD C3 9F 06 JP 06W_ jSPfiUflp ZUR DOSIHITIALISIERUNS 

RST to 

0010 C3 03 40 JP 4003 iSPRUHfi UEBER RAH-VEKTDR 4003 NACH 1D78 

0013 CS PUSH K ;TEIL DES INCH IDISK-READl-AUFRUFS UEIER DCB: DC RETTEH 

0014 OA 01 ID B.Ol ||[T VON B FUER INCH SETZEN 
OOU le 2E JR OM )»HUH6 ZUR DCS-AUFRUFIIDUTIHE 

RST 18 

OOIB C3 06 40 JP 4006 jSPRUNB UEKR RAN-VEKTOR 4006 NACH 1D90 

OOIB C5 PUSH BC jTEIL KS DUTCH IPmNT/DlK-BfilTEI-flUFRUFS UEIER DCB: DC RETTEH 

OOIC 06 02 LS B.02 ;BIT 1 VON B FUER OUTCM SETZEH 

OOIE Ifl 26 JR 0046 ;5PRUH6 ZUR KB-AUFRUFRflUTINE 

BST 20 

0020 C3 09 40 JP 4009 ]SPRUN6 UEIER RAH-VEKTOf) 4009 HACH 2B59 

0023 C3 PUSH DC ;H. V. 

0024 06 04 LO B,04 
0026 18 IE JR 0046 



RST 28 
0028 C3 OC 40 JP ^OOC _ iSPRUHG ZUR RAH-VEKTM 400C lUHBEHUTZT) 

UP INCH (AF,>E>401S) 

TASTATUft#RA6E 

it/ 

eiA<ftSCH-CODE HEU 6E0RUECKTER TASTE ODER 0, HENN KEINE NEU BEDRUECKT 
002B 11 IS 40 LO DE.4015 jKErBOARD-DCD-ADRESSE HUH DE 

002E 18 E3 JR 0013 ;HEITER DEI 0013 

RST 30 
0030 C3 OF 40 JP ^400F )SPRUIIG ZUH RAB-VEKTOR 400F (UNKHUTZT) 

UP DUTCH IF,DE*401D) 

AUSBAIE E1NES ZEICHEHS AUF DEN BILSSCHIRH 

]lA*A5Cn-CDDE DES AUSZUSEBENDEN ZEICHEHS 

0:/ 
0033 11 ID 40 LD DE,40]D tBISPLAY-BCB-AHESSE NACH BE 
0036 IB E3 JR 0018 ]KITER BEI OOIB 

RST 38 
0038 C3 12 40 JP 4012 ;SPRUHfi ZUH RAN-VEKTOR 4012 (UMDENUTZT) 

UP PRINT <AF,DE=403S) 

AUSSASE EIHES ZEICHEHS AUF DEN DRUCKER 

IiAoASCII-COSE DES AUSZU6EBEHDEH ZEICHEHS 

01/ 
003B 11 25 40 LD 0E,402S |PRINTER-DC6-ADRESSE NACH DE 
003E IB DB JR OOIB {KITER BEI OOIB 

0040 C3 09 OS JP 0509 {SPRUHG ZIH) INBUFF-ROUINE (SIEHE DORTI 

0043 C9 RET iH. V. 

0044 00 NOP 

0045 00 HOP 



0046 CJ C2 03 JP_ 03C^ __ |3PRWG ZUR DCB-AUFRUFRDUTIME (SIEHE OORTt 
UP INCHH (IV,DE«40151 

SEITE S 



TASTATURABFRA6E (MfiTET BIS EIKE HEU£ TUTE 6EHli£CKT tlltffl) 

Is/ 

OtA=<ISCI[-CODE NEU GEDRUEUTER TASTE 
0049 CD 2B 00 CALL 002S ;INCH AUFRUFEN 

OOIC B7 OR A jKt£ TASTE BEDfiUECKT? 

0O4D CO RET HI ;JA. lUMECK HIT CQK IN A 

00« 18 F9 Jft _ 0049 |NEfN, HEITER 

TASTATWHCOIJERtlWSTUELLEl 

KIHHALTET HE ASCII-CODES OER CONTROL-TASTEN IN FDL6EHKR REIHENFOLOEt 
ItMSHlFTEl, SHIFTED) 
ENTER CLEAR IREAK UP MMN LEFT RI6HT SPACE 
00» OD OS IF IF 01 01 31 IB OA lA 01 18 09 19 20 20 t 

UP BELAY IAF=0044,Bi;=0000) 
2E1TSCHLEIFE 

liBC'lESTlHttT ZEITMUER (14.66 US t K) 
Oi/ 

0060 Ofi BEC BC ) SCHLETFENIAEHER DEC. 

0061 78 LD ft,B !SCHLEIFEHZAEaEfi=0? 

0062 Bl OR C 

0063 20 FS JR N2,0060 ;HEIN, HEITER 
0063 C9 RET 



RESET-ANSPRUWADRESSE (WII-VEKTOfi) 

0066 31 00 06 LD Sf,0600 ;SUAftK 

0069 3A EC 37 LB A,(37ECI jFDC AH6ESCHL0SSEH? 

006C 3C INC fl 

006D FE 02 CP 02 

006F Q2 00 00 JP NC.OOOO ;JA, SY8TEHIN1TIAL181ERUW 

0072 C3 CC 06 JP ^06CE ]HE1N, SASICHARNSTART 

BASICINITIALISIERUMG 
M75 II 80 40 LD K,4080 jUP'S FUER D1V.,I)UT,IHP U. fl, IN RAd UEBERTRA6EN 

0078 21 F7 18 LD HL,18F7 iSIEHE 1BF7 F. 

0071 01 27 00 LB BC,0027 )LAEHGE DES BEREICHES 

007E ED BO LDIR 



1/D-BUFFER EIMICHTEN; 

0080 21 £5 41 LD HLj41E5 jl/O-BtlFFERftDRESSE-3 NACH HL 

»e3 36 3A LD IHL),3A i'i',0,',' AUF DIE 3 BYTES WW DEN 

OOSS 23 INC HL (I/Q-BIJfFER SCKREIBEN 

0086 70 LB (HL),B 

0OB7 23 INC HL 

0088 36 2C LD (H1,2C 

008A 23 INC HL 

008B 22 A7 40 LD 140A7),M. jI/Q-BUFFERADRESSE (41E8) ABSPEICHERH 

DISK-BASIC-ERNE I TERUWEN ZURUECKSETZEN 

WBE 11 2D 01 LD D£,012D ;VEKTDR£N FUER NEUE SEFEHLE AUF L3-ERR0R SETZEN 

0091 06 IC LD Bjlc j28B STUECK 

0093 21 52 41 LD HL,41S2 ;RAmDftESSE DER VEKTCHtEN MACH HL 

0096 36 C3 LD (HL},C3 ; SPRUN6BEFEHL EIHSCHREIBEH 

0098 23 IHC HL jZEIEER INC. 

0099 73 LD (HL),E |SPUH6ASRES5E EINSCHREIBEM (LSB) 
009A 23 INC HI ;ZEIS£R INC. 

0O9B 72 LD (HL),D fiflSB) 

009C 23 INC HL |ZE16ER INC. 

009D 10 F7 DJNZ 0096 |KITER 

_ ZEI&ER FUER ERNEITERUN6 ALTER LEVEL 2 BEFEHLE DURCH RET ERSETZEN 

009F 04 15 LD S,19 ;27B STUECK 

OOAl 36 C9 LD (rtL),C9 ;RETURN-BEFEHL ABSPEICHERN 

0M3 23 IHC HL ;PLATZ FUER EVEHTUEa EINZUFUESEHDEH 

00A4 23 INC HL | SPfiUNSBEFEHL LASSEN (3 BYTES) 

00A5 23 IHC HL 

0OA6 10 F9 DJHZ OOAl jHEITER 

PRDSRAHHAHFANS NARKIEREH UHD STACK IHITIALISIEREN 

00A8 21 £8 42 LD HL,42£8 |ZEIGER AUF BYTE VOR PRD6RAfflANFANG 

OOAB 70 LD (l€),B [0 ABSPEICHERN 

OOAC 31 F8 41 LD SP.4tF8 {STACXPOINTER LAKN 

OOftF CD 8F IB CALL IBflF [STACK IHITIALISIEREN (IN NEH SPRIN6EH) 

HEH SIZE ODER SPEICHERENDE ERHinELH 

00B2 CD C9 01 CALL 01C9 tBILBSCHIiW LQESCHEH 

0085 2105 01 LD HL.OIOS jZEISER AUF TEXT 'HEMWY SIZE' MACH HL 

OOBfl CD A7 28 CALL 28A7 jTEIT AUS6EKN 

OOBB CD B3 IB CALL 1BB3 ;'? ' AUS6EBEH UHD EIHSABE EIHER ZEIU 

SEITE 6 



OOBE 38 F5 JR C.OOBS jMEAK? --> M, EfiHEUTE ABFRABE 

MCO D7 RST 16 lERSTES ZElCHEli SUCHEH 

^1 BJ _ M A fZElLEKUE? tD.H. HICHTS EIN6E6E8EN) 

»C2 20 12 JR «,MB4 jHElH, HEfl SIZE 

0CC4 31 4C 43 LS HL,434C iSKltNOEIK SUCHEH AB 4349 

WC7 23 INC HI IEI6ER AUF MECHSTE ZEUE 

J«fl JC U ft.H )ZE16E«-0? (ROH ERBEICHT) 

OOCA 2S 18 m Z,00E7 iJA 

WC 7E LD A,(HL) (SPEIUERINHALT LAKH 

MCB 47 L8 B,A jHACH ■ RETTEH 

»CE 2F CPL {l-COHPLEHEHT BILDEH 

WF 77 LD IHL),A gUM AKPElCKEflH 

«M K CP (HL) ]AUS8ELESEIER BERT IDEHTISCH? 

?»' ?5 LB (HL),I jALTEH HERT HIEBEftHERSTELLEH 

0OD2 28 F3 Jfi Z,»C7 ;JA, HAECHSTE SPEICHEBZELLE IBtTERSOCHEH 

«D4 IS 11 JR 06e7 iERHITTELTES SPEICHEREHK HEITERVEHARBEITEH 

HEH SIZE VERARKITEM 

»B6 CO 5A IE CALL lESA fSTRIM IH IHTEEER « i5530D (IH DE)1 UfWAHDELN 
MI>f B7 MA ;DAMCH ZEILENEHK? 

OODACZWIS JP tlZ,1997 |HEIH, SH-ERROfi 

OODE II Ik nf '"^ iWil Sl ""'"' «*^'=««^LLE '^' "SIC HACH HL 

WW 3E 8F LD A,8f (TESTHERT ff IH AKKU 

MEl ii LB B,(HL1 {IHHALT DER ZRLE NACH B RETTEN 

0«2 77 LD (111, A jTESTKRT EIHSCHREIKN 

^J BE CP (HLt (fllT AUS6ELESEHEH HERT IBEHTISCH? 

0«4 70 LD (HL),B jALTEH HERT ZURUECK 

00E5 20 CE JR^ HZ,0W5 tHEIM, HEUEN HEH SIZE ANFORDERH 

SPEICHERBEREICH FUER BASIC FE8TLEBEH 

^I ?? .. „ ^^ * t"'*R AUF LETZTE WRHAN&eHE ZELLE 

OOES 11 14 44 LD 0E,44]4 

OOEI DF RST 18 !<4414? 

WEC DA 7fl 19 JP C,197fl jJA, M-ERROR 

WEF 11 CE FF LD Dt.FFCE jMOO-MB HACH DE 

WF2 22 Bl 40 LD MOBD.HL jZEISER AUF LETZTE BPEICHEfiZELLE ABSPEICHERH 

-^? ^? .. *'*" %" f"»" EftSIBT AKFAN6 DER 8TRIN6-SPACE-1 IN HL 

00Fi22AO40 LD I4M0),HL ;AHFANfi DER STRIHGSPACE-l ABSFEICHERN 

00F9 CD 4D 18 CALL 1B4D )HEH. ALLEB LOESCHEH 

MfC 21 11 01 LD HL.Olll fZEI^ AUF TEIT 'RADIO SHACK L 11 BASIC 

OOFF CD fl7 2S CflU 28A7 jTEIT AUSBEKK 

0102 C3 19 lA JP 1A19 fSffiUM IW HAUPTSCHLEIFE 

TEKTE 

0105 4D 45 4D tF 52 59 20 53 49 5A 45 00 NEHORV SIZE. 

0111 52 41 44 49 4F 30 S3 48 41 43 4B 20 4C 45 36 45 RADIO SHACK LEVE 

0121 4C 20 49 49 20 42 41 53 49 43 OD 00 L II BASIC. 

L3-ERR0R 

012D IE 2C LD E,2C ;L3-ERR0R-CODE NACH E 

012F CJ A2 19 JP^ m jSPRUHG ZUR ERRDR-ROUTINE 

GRAHIKANHEISUN&EH UW) FUNKTIOHEH: 

II POIHT-FIMTIOH 

ERHITTELT, OB &RAPHIKPUNKT BESETZT 1ST 

0132 07 RST lb iNAECHSTES ZEICHEH 

0133 W lOR A )FLA6 A FUER PfllHT AUF SETZEH 

0134 01 3E 80 LD BC,803E 

tt SET-AHHEI5UN6 
SETZT SRAmiKPUNKT 

(0135 3£ 80 LD fl.BO }FLA6 A FUER SET AUF 80 SETZEN) 

0137 01 3E 01 LD BC,013£ 

tt RESET-ANHEISIM 

LOESUJT BRAPHIKPIMKT 

(0130 3E 01 LD A.Ol jFLAO A FUER RESET AUF 1 SETZEN) 

013A F5 PUSH AF ,FLA6 RETTEH 

013B CF RST 08 (SYNTAK-EHECKi POINTER AUF M'? 

013C 28 I 

013D CD IC 28 CALL 2B1C )AUSDRUCK AUSUERTEH, ERA < 256D NACH A, l-KOORDIHATE 

0140 FE 00 CP 00 !>127D' 

0142 D2 4A IE JP HC,1E4A )JA, FC-ERROR 

0145 F5 PUSH AF )I-K0DRBIHATE RETTEH 

0144 CF RST 00 iSfflTAX-CHEEKi POINTER AUF ','? 

0147 2C , 

SEITE 7 



014B CD IC 28 
0141 FE 30 
41 » 12 U IE 



0150 14 FF 

0152 U 

0153 D& 03 

0155 30 FB 
0157 U 03 

0159 4F 
OlSA Fl 
015187 
015C5F 

0156 06 02 
015F 7ft 

0160 IF 

0161 57 
016! 71 

0163 IF 

0164 5F 

0165 10 FB 
0167 79 

01 6B 8F 

0169 3C 
016ft 47 
016B AF 
016C37 
0161 8F 
D16E 10 n 

0170 4F 

0171 7fl 

0172 F6 3C 

0174 57 

0175 lA 

0176 B7 

0177 H 7C 01 
0171 3E 80 
01 7C 47 
0171 Fl 
fll7£ 87 

01 7F 78 
OIBO 28 10 
0182 12 
0tS3 Ffi BF 01 



•IBi 79 
0187 2F 
01B8 4F 
0189 lA 
OlSA Al 
0181 12 
01% {^ 
0189 79 
018E C9 



018F Bl 
0190 18 F9 



0192 Al 

019J E6 FF 

0195 9F 

0196 E5 

0197 CB ao 09 
019A El 

019B 18 EF 



CALL 
CP 



2B1C 

30 

HC,1EU 



;AUSIWUCK AUSKftTEH, ERG < 2560 NACH A, Y-KDOflSINATE 

;>47D? 

}», FC-EiffiW 



MIS lEIBEH KaORDIMTEH filLDSCKIftMHESSE UHD MSKE BESTIHNEN 



LO 

INC 

sus 

JR 

ADD 

LD 

MP 

ADD 

L9 

LI 

LB 

RRA 

L9 

LD 

RftA 

LD 

UMI 

LD 

ADC 

IHC 

LD 

lOR 

SCF 

ADC 

mn 

LD 

LB 

OR 

LO 

LD 

OR 

4P 

LD 

LD 

POP 

OR 

LB 

JR 

LI 

W 



03 

IIC,0152 
03 
C.A 

aI' 

A 

E,A 
102 
*,D 

D,A 

a;e 

E,A 
615F 

"/ 

A 

«'■' 

A 

01 6D 
C,A 

&• 

D,A 
A, (DE) 

H,017C 
A, 80 

A 

A,t 

Z,0192 

(K).A 

H,01» 



IVHCOORD. HJRCH 3 TEILEN, TEILER MACN D, REST MACH A; TEILER ' -1 
TEIUt ♦! 

tr-K00R9IMTE - 3, UNTEH.AtJF7 
{KIN, KITEft 

|JA, LeTZTE SWTRAKTIOH RUECKBAENGie, REST WW IM A 
]REST NACH C 

iX-KDOI»IMTE ZUfiUECK NACH A 
il-KOOfillMTE ML 2 NACH A 
;ALS L& DC, ¥-UHWDIUTE/3 ALS ¥S,i OE 
iK DORCH VlER TEILEIIt2 DURCHBAEHDE 
;K HKH 2 TEILEN 
)4DEIURC((4 ER6IIT IN DE 
}64l t INT (Y/5t 4 IHT iHl)) 



;2 ML 

)REST V73 NKH A 

|f(AL 2 + REST X/2 ER6iBT BIT IN DER HASKE 

t+1, W CY IH AKKU 2U SCHIEBEM 

;WaMCHB 

;nASKE > 

{CARRY SETZEN 

;HA5KE t 2. BIT NACH LINKS SCHIEBEN 

;B ML HIEDERHOLEN 

{MSKE NACH C 

;DE * 3C00, ER6IBT ABSOLUTE BILDSCHIRMDRESSE 



JBILDSCHIRNINHM.T LADEN 

;GRAPHICCDDE? 

WA 

IDURCH 6RAPH1CSPACE ERSETZEH 

{HACttfi 

;FLA6 ZUfiUECX 

iPflWT? 

IZEICHEH AUF POSITION ZUREIECK NACH A 

;JA 

;BEI SET UMD RESET, ALTEH CODE BIN. 80 AUF BILD^IHIRtl 

{SET? -> WfWW 



RESET AUSFUEHREH 



LB 

CPL 

LO 

LD 

AND 

LD 

RST 

RET 



A,C 

C,A 
A,(DE) 

(DE},A 
08 



SET AUSFUEHREH 
OR C 

JR OlSB 

POINT AUSFUEIffiEH 
AW C 

ADD 

SK 

PUSH 

CALL 

POP 

JR 



FF 

A 

ML 

099& 

HL 

01 BC 



{MSKE KOflPLEKNTIEREN 

{BlLDSCHimiNHALT HH KOHPLEHENT UND-VERKHUEPFEN 
{(D.H. BENUEHSCHTES IIT NE8BUNDEH) 
jUNS NIEBER ABSPEiCHERH 
)SCHLUSSiSYNTA)[CHECKi ZEI6ER AUF ')'? 



{BILD3CHIRH1HKALT HIT HASKE ODER-VEfKN. 
{NEITER NIE BE! RESET 



{POINT AUSFUEHRENi BILDSCHIRHIHHALT NIT MSKE UNDIEREN 

JBIT SESETIT --> ft>0 

{KHH A>0 HIRD BAS CARRY-FLAG GESETZT 

(HEHN CARRY GESETZT, A=FF, SONST A>0 

{POINTER RETTEN 

{AKKU (HIT SIGN) ALS U-BIT-INTEGER NACH 1 

{POINTER ZURUECK 

IHEITER 



tt INKEYI-FlMKTim 

TASTATURABFRAGE OHHE PROGRAMtSTOP 

0199 D7 RST 10 {NAECHSTES ZEICHEM 

019E E5 PUSH HL {POINTER RETTEN 

019F 3A 99 40 LD A, (4099) {ZEICWN AUS INKEVt-ZHI9:HENSPEICHER LADEN 

01A2 B7 OR A {ZEICHEH VORHAHDEN? 

OtA3 20 06 JR HZ.OIAB ;JA 

01A5 CD Se 03 CAU 0358 {TASTATUR<WRAGE, QHHE iARTEN 

SEITE 8 



OIU 17 OR A iHEUE TASTE SEMUEWT? 

41H 28 11 JR Z.OIK fHEIN LEEIBTRIN6 HACH K, FERTI6 

•lU F9 PUSH 4 iZEICHEH RETTEH 

41AC AF lOR A IZEICKH IGESCHEH 

01U32 99 40 LD 14099), A )IIKErt-Z«I8ClEHSfEIC(tER LDESCHEK 

eiH 3C INC A |STRIIieLA£H6E>l 

0111 CI 57 28 CALL 2857 ;PLATZ FUER l-IVTE STRING IN STRIHSSPACE FREIMCHEN, 

fUM ADRESSE III VIMLAEUFieEH ZHISCHEHSPEICHEf) 

«1M Fl POP AF iZEICHEN ZURUEU 

OIK 2A P4 40 LD HL,(40e4) fAWESSE AUS ZHISCHEHSPEICHER LADEN 

01H77 LD (HL),A gZEICHEH IH STRINSSPACE ABSPEICHEM 

01B9C3 84 28 JP 2884 |ZEI6ER AUF ZHISCHEHSPEICHER MACH I, TVPX'STRIW 

OIK 21 28 19 LD HL,1928 |ZEI6ER AUF (STRIHSLAEHBE) HACH Hi 

«1IF 22 21 41 LD (4121), HL ;HACH 1 

Old IE 03 LD A,03 )TYPCI»E FUER STRIHB (3) HACH A 

01C4 32 AF 40 LD (4MF),A )UNB IH TYPI AISPEICHEM 

01C7 El POP HL iPOlHTEfi ZUMECK 

OICI C9 RET 

UP CLS (A>1F,F) 

II CLS-AHKISWe 

BILKCHIRR HIRD GELOESCHT 
I)/ 
Oi/ 

41C9 3E IC LD A.IC {HOHEIMCPD-CODE NACH A 

OICI CI 3A 03 CALL 033A lAUSGEBEH 

OICE 3E IF LD A.IF g CLEAR-TO-EHD-OF-FltAHE-COBE MCH A 

eiH C3 3A 03 JP 033A ;AUS6EBEK UHB ZUMIECX 



II 


RAW0H-ANHEISUH6 






IHITIALISIERUN6 KS ZUFALLSZAHLEH6ENERAT0RS 


01D3 ED 5F 


LD 


A.R 
(40AB),A 


)REFRESH-RE6I8TER MCH A 


01D5 32 « 40 
01 M C9 


LI 
RET 


)!H RAHDM-NlfllBER-SPEICHER MSPEICHERN 


UP 


PULK 


(AF,B=00,l«.>FCOO) 




61 IT IHHPUtS AUF 
Ii/ 


KA3SETTE AUS 


01D9 21 01 FC 


Di/ 
LD 


HL.FCOl 
0221 


)AUX AUF 0.86 V SCHALTEN 


01 DC CD 21 02 


CALL 


llBIT VGNPORT 255D SETZEH) 


oiDF OA oe 


LD 


8,01 


]81 US HARTEH 


OlEl 10 FE 


DJNZ 


OtEl 




01E3 21 02 FC 


LD 


H.FC02 
0221 


]AUX AUF V 


01 Ei CB 21 02 


CALL 


glBIT 1 VOH PE»T 25SD SETZEH) 


01E9 Oi 08 


LD 


1,08 


|81 US HARTEH 


OlEl 10 FE 


DJNZ 


OlES 




OlED 21 00 FC 


LD 


HL.FCOO 
0221 


)AUX AUF 0.49 V 


OIFO CD 21 02 


CALL 


;I8IT UW 1 VOH PWT 255D ZURUECKSETZEH) 


OIF! 06 5C 
01F5 10 FE 


LB 
UHZ 


I.SC 

OiF5 


)601 US WUTEH 


01F7 C9 


RET 







UP CASQFF <AF) 

CASSETEHRECORDER AUS5CHALTEH 
I:/ 
Di/ 
01F8 E5 PUSH HL ;HL RETTEN 

i!K li '^. " ^X '^,'f„•** (PAMHETER FUER PORTCT: BIT 4 ZUfiUECKS., ALLES AHDERE UNVERAEHOERT 

OlFC IB II JR ^ 0219 iSPRUHG ZUR PORTCOHTROLROUTIHE 

UP CASHO (AF BC DE HL=P) 

lECEHlERT CAS^TfEMECORDERHR. UNB SCHALTET CASSETTENRECORDER EIH 

I]HL>ZEIBER AUF 'I', HEHN CA35ETTEHRECDRDERNR. AN6E6EBEH 

Ot/ 

A.IHL) ;ZEICHEH UEBER PQIHTER LADEH 

23 )-'•'? 

A.OO iA*0, CASSETTEHRECORDERHR. t 1 = 0, HERN KEIHE AR8EGEBEH 

NZ,0212 (HEIN 

2B01 lAUSDfiUCK AUSHERTEH. eAHZZAHLIGEK NERT « 6553AD) HACH DE 

08 iSYHTAICHECKi POIHTER AUF ','? 

A,E jAKKU < CASSETTblRECORDERW. 

D 

02 (CASSETTEHRECORDERHR. = -1 QDER -27 

NC,1E4A tHEIN, FC-ERROR 

A ;AKKU = CASSETTEHRECORDERHR. M 1A=0, FUER -1 UHD FF FUER -2) 

(37E4KA [CASSETTE SELECT LATCH SETZEH 

SEITE 9 



OlFE 7E 


LD 


OlFF Di 23 


SU8 


0201 3E 00 


LD 


0203 20 OD 


JR 


0205 CD 01 2B 


CALL 


0208 CF 


RST 


0209 2C 




020A 71 


LD 


02OI A2 


AHD 


02OC C6 02 


ADD 


020E D2 4A IE 


JP 


0211 3D 


DEC 


0212 32 E4 ;;7 


LD 



UP CASOH itf> 

SCHALTET CASSETTEHRECORDEf) EIH 

hi 

01/ 

0213 E5 PUSH KL ;POMER RETTEH 

021i 21 04 fF LS HL.FFM ;PMtAHETER FUER PDRTCT 

0219 CD 21 02 CALL 0221 (IIT 2 VDH PORT FF SETZEN 

021C El POP HL iPDIHTER ZURUECK 
021 D C9 RET 



UP RESINP (AF.HL-FFOO) 

5ETZT DEN EIBABEPQRT BIT 7 VtW PURT 255D ZURUECK 
I:/ 
0:/ 
021E 21 00 FF LD HL,FFOO )PMA11ETEfi FUER PORTCT, ALLE AUS8ABE BITS UNVERAENDERT 

UP PQfiTCT lAF) 

STEUERT PORT 2550 
I)H>ZU LOESC»€NBE BITS (UKD-HASKE) 
L-ZU SETZEWE BITS IDKR-HASKE> 
U030)>ALTER PORTSTATUS 
0i(403D)>NEUER PORTSTATUS 
4221 5A 3Q 40 LD A,(403D) iALTEN PORTSTATUS LAKH 

0224 A4 AND H ;HIT H UNS-VERKMUEPFEN 

0225 K OR L ;UMI NIT L OKR-VERKMfFEN 
022t D3 FF (HIT FF jAUF fWT 2550 AUSGEBEN 

022S 32 3D 40 LD 14030), A ;UWI ALS HEUEN PORTSTATUS ABSPEICHEM 

0221 CT RET 



UP BLINK (AF> 

SCHALTET STERN IN BILDSCHIRHECXE UK 

l!/ 

0:/ 

022C 3A 3F 3C ID A,(3C3FI )IMM.T VH RECHTER, OBERER BILDECKE LADEN 

022F EE OA lOR M [dlT OA lOR-VERKNUEffEN C '->'!', '!'->■ ') 

0231 32 3F 3C LD I3C3F>,A ;IIIEDER ABSPEICHERN 

0234 C9 RET 

UP READB (AF> 

LIEST BYTE VIM CASSETTE 
It/ 
OiA>EIN6ELESENES BYTE 

0235 CS PUSH BC ;BC RETTEN 
023A ES PUSH HL |HL RETTEN 
0237 06 08 LB B.OB ;BITZAEHLER>8 

0239 CD 41 02 CALL 0241 )BIT EIHLESEN (A'21A+BIT) 

023C 10 FB DJNZ 0239 |B HAL UIEDERHOLEH 

023E El POP HL t»EfiISTER ZURUECK 

023F CI POP BC 
0140 a RET 



UP REANI IAF,HL=FF0O) 
LIEST BIT m CASSETTE 
I;A>BYTE 
0!A=BrTEI2+flIT 

0241 C5 PUSH BC )BC RETTEN 

0242 F5 PUSH AF ;BYTE RETTEN 

0243 DB FF IN FF |AUF SYHCWONBIT HARTENt INPUT LE5EN 
0245 17 RLA (INPUTBIT BESETZT? 

024i 30 FB JR NC,0243 )NEIN, HEITER NARTEN 

0248 06 41 LD i,4l t47i US NARTEN 

024A 10 FE DJNZ 024A 

024C CD IE 02 CALL 021E |IK>UTBIT ZURUECK SET ZEN 

024F 06 76 LD B,76 {S^S US NARTEN 

02S1 10 FE IJHZ 0251 

0253 DB FF IN FF ;DATEHGIT LESEN 

0255 47 LB B.A ;NACH B7 

0256 Fl POP M" ;BYTE ZURUECK 

0257 CB 10 RL B |DATENBIT IN CARRY 

0259 17 RLA ; ByTE»2IIYTE*DATEWIT 
02SA F5 PUSH AF {REUES BYTE RETTEN 
02SB CD IE 02 CAU 02IE ;INPUTBIT ZURUECKSETZEN 
025E Fl f(ff AF {HEUES BYTE ZWtlKCK 
025F CI POP BC ;BC ZURUECK 

0260 C9 RET 



UP IRBTH 

SCWEIBT BYTE ZUEIHAL AUF CASSETTE 
IiA=AUFIUZEICHNENDeS BYTE 

SEITE 10 



m\ Cfi M 02 CALL 0264 {lYTE AUFIEICHNED 

UP tftlTEl 

SCHREIBT BYTE AUF CASSETTE 

IiA-AUFZUZElCHH£HDES BYTE 

Oi/ 

02M E5 PUSH HL |M11£ REGISTER RETTEN 

02&3 CS PUSH K 

nU 05 PUSH DE 

0267 FS PUSH AF 

Q26S OE OS LD C.OS )IITZAEHLER ■ 8 

026A 57 LO D.A ;IYTE fMCH D 

«26B CB W 01 CALL 01D9 | SVHCMHMINPULS AUS6EBEN 

U6E 7A LB A,0 {BYTE ZUItUECK MCH A 

t36F 07 RLCA |HAECNSTES GIT IN CARRY SCHIEBEH, '1? 

0270 57 LB B.A jHIEDER HACH B 

4271 30 06 JR HC,027E )IKIH, KEIH BATENIHPULS 

0273 CD D9 01 CALL OlB? iDATlkinPULS FUER H-BIT 

0276 00 BEC C |S Ml HIEDERHOLEH 

0277 20 F2 JR HI,026B 

«79 Fl POP AF [ALLE RE6ISTER lUftUECK 

027A Bl POP BE 

027B Ct POP BC 

027C El POP HL 

027B a RET 

027E 06 S7 LD B.87 ;PAUSE FUER L-BIT AUS6EBEM1 W U3 HMTEM 

02SO 10 FE OJHZ 02B0 

4282 IS F2 JR 0276 jKITER 

UP INITK (tf,BC,OE,HL«P) 

CASSETTENKCOROEt) AN UNO SYHCHRDHBYTES AUFZEICNEIt 
nSIEHE CASSH 

0!/ 

t2» CB n 01 CALL OlFE ;CASSETTENflECO)tBERM). OECOBIEREN UNO CASSETTEMtECDRKR AH 

UP WRITES IAF>A544,B>00I 

SCKREIBT SYHCHRIMSYTES I255B t UHB AS) 

It/ 

01/ 

0287 06 FF LD B,Ff ;255B HULL-BYTES AUFZEICHKN 

026? AF DQR A A>0 

02aA CB 64 02 CALL 4>2U ;«)LL AUFZEICHHEN 

02B0 10 F8 OJMZ 028A ;2S5B HAL HIEDERHOLEH 

02eF 3E AS LO A.AS )SVKWtONBYTE AS IH AKKU 

0291 18 Bl JR 0264 ;UNO AUFZEICHHEH 

UP IHITR (A=2A,F.ML»PI 

CASSETTENRECMDER AN UHO SYHCHRDHBYTES LESEN 
I:HL>PDIHTER AUF CASSETTEHHR. 

0!/ 

iin CB FE 0] CALL OlFE fCASSETTENHR. DECODIEREH UNB CA35ETTENREC0RDER AN 



UP 


READS 
LIEST 

Ii/ 


(A>2A,F> 

SYNCHRONISATION 


0296 E5 


0:/ 
PUSH 


HL 


) POINTER RETTEN 


0297 AF 


lOR 


A 


)AKKU LOESCHEH 


0298 CB 41 02 


CALL 


0241 


;BIT EINLESEN 


029B FE AS 


CP 


AS 


iSYMCIfRONBYTE AS BEFUNDEH? 


0296 20 F9 


JR 


NZ,0298 

A,2A 

(3C3E),A 


(HEIN, NAECHSTES BIT EINLESEN 
1 STERN IH KKU 


029F 3£ 2A 


LD 


02A1 32 3E 3C 


LO 


IZMEI STERHE IH 08ERE, RECHTE ECKE SETZEN 


02ft4 32 3f 3C 


LD 


(3C3F),A 




02A7 El 


POP 


HL 


; POINTER ZUfHlECK 


02AS C9 


RET 








EHTRYPOIHT LESEH 




02A9 CO 14 03 


CM.L 


0314 


iEHTRY-POINT EINLESEN 


02AC 22 OF 40 


LB 


i40BF),HL 


)UW ABSPEIDSRH 


02AF CD Fa 01 


CALL 


01F8 


{CASSETTE AUSSCHALTEN 



« SYSTEn-BEFEHL 

LIEST SYSTEM-TAPES UNO STAATET 6IE 
02B2 CI E2 41 CALL 41E2 

02B5 31 38 42 LB SP,4288 [STACK IH I/0-BUFFER (I) EINRICHTEH 
02B8 CB FE 20 CALL 20FE iCR AUS8EBEN 
02BB 3E 2A LB A,2A (STEM IN AKKU 

SEITE 11 



02UCI 2t 03 

«2n aB3 IB 

OXIMU 04 
«U 17 

02C7 U 97 If 
«UFE3F 
02CC 2t 4f 



02CE C9 93 02 
121)1 U 33 01 
02H FE93 
92H 2eF9 
*mOi04 
02H7E 
021117 
«2K 2IOf 
02K ass 02 
02E1 K 
•3E2 20D 
02E4 23 
02a 10F3 
02E7U 2C 02 
0aUCI3SO2 
02aFE 71 
03? 2IN 
t2Fl FE 3C 

on2eF3 



073{:t3S02 
UFI 47 

02F9CI 14 03 

OTCn 

•2n4F 

•7E ass 02 

0301 77 

0302 23 

0303 81 

0304 4F 
03«9 10F7 
0307 CI 33 02 
03HI9 

0301 21 M 
0301 3E 43 
030F 32 3E 3C 
0312 II H 



0314 CS 35 02 
0317 if 
031t Ct 33 02 
0311 i7 

031CC9 



«3iia 

•31E 2Jl OF 40 
0321 a 
•322 17 
0323C4M IE 
U3i 20M 
032tD 
•329 E9 



032* CS 
•3n 4F 

•32C a CI 41 
•32F M fC40 
•331 B7 
0333 79 



CALi 
CMl 
JP 
1ST 

JP 
CF 

n 



032lt 

1M3 

C.OiCC 

14 

if 

Z,031D 



lUSKKN 

I'? ' muaa m mimimm, H£K7 

|H. IMICWMSTMT 

lEriTES ZEIdCa UCXN, lEIUNEME? 

|M, M-EJUn 

\'r (OUECTFILE 8TMTE1)? 



OUECTFILE VON CASSETTE UBEI 



CMl 
CMl 
CP 

n 

LI 
LI 

n 
ji 

Ml 
CP 

n 

IK 
MI 

CALL 

CALi. 

CP 

» 

CP 

n 



0293 
»33 

ss 

A,(HL1 

I,02E7 

«3S 

IW.) 

IIZ,02il 

ft 

02DA 

022C 

0233 

71 

\r 

ia,na 



AECOU LESEI 
CAU 023S 




ICASSETTE AN UN SVKHHMISATION LESEN 
flYTE LESa 
I-FILEMCMHaO? 
tMEIH, HAEOBTES ITTE 
(lABlEll FUEI k ZEiaa PEI NAHEH 
IZEIOB AU8 I/D-ttFFEA UUCN 
IZEILEKME? 
|JA, FIU LA« 

iNMEmVTE Vn CASSETTE LESEI 
l-im AUI I/O-MFFER? 
IHEII. NCCWTa FILEHMEKAHR SaOH 
lI/0-IUFFES-ZEIBEII INC. 
IKITEI IIS ALU i WMLICHEN 
ISTBW UR9CMALTEH 
lITTELESa 
t>QrTIYP0INT)CAIBt7 
l» 

I-MTAKAKK? 
^ICIN, HECHSTEI ITTE 

lAECanJEMK LE8EN 

INACM I 

iKCQIfiAVANBSAMESSE LESEN 

iPHEFSUK lEI AHESSC IILBEN 

iHCU C 

IMTENIYTE LE» 

}ANPE1CNEM 

IZEIBER INC. 

|ZW PMEFSUW AHIEHN 

llEITER, IIS tfCOn BELESEl 

IPMEFSME LESEN 

IHEMTISCM HIT EIKCHICTEI PfUEFStHC? 

;JA, NAECKSTEN ttCOn 

iFEftER AUS8E»i 'C HACH A 

(FUES IINKEN STEM EINSETZEI 

itflTEA 



UP KAH (AF.NL) 



LIEST MKT aSI, Rtt) VON CASSETTE 

Ii/ 

lift-CINIELESEKS UNT 

CAU 0233 |LSI LESEN 

LiA iMCHL 

«33 iHSI LESEN 

H,A )MCM H 



LI 
CALL 
LI 
RfT 



OUECTFILE AnniHKI 



El 
LI 

EI 

RST 
CALL 

n 

EI 

JP 



IE,NL 

ft,(40«F> 

Kid. 

II 

HZ.IESA 

HZ,02I2 

KjM. 

(ft) 



Il/O-MFFEU. MCMK 

lEVnrTPOINT LAIEN 

Il/O-HFFEKI. ZUMECK 

INAEDBTEI ZEIOO, lEIEIClK? 

IKIH, ZAft EMimLI (MCH K) 

IMOCH HEW lElCHEN? -> STSTEH-KFEft-REITAItT 

lAKSPIUWADHSK NACM ft 

lANSPfllHfiEH UEBES ft 



UP CUTCHF (Fl 



6IIT ZEICMEI AUF IILDSCHIIM, PRINTER USER CASSETTE AUS 
1IA4U8ZUBEBENKS ZEICHEH 

(409C).AUSSAIE-FLAS lO^ILHCMIM, 1-PRIITER, BO-CASSETTEl 
0)/ 
PUSH U |K RETTEI 

IZEICHEN HACH C RETTEN 



LI 

CALL 

LI 

OR 

LB 



BC 

CjA 
4101 
A,(409CI 

A,C 



iFLAS LAKH 
(FIM TESTER 
(ZEICICM ZUtUECX 

SEITE 12 



0334 CI PDF BC {K ZURtKCX 

0335 H M U JP H,02M {CASSETTE? ~> MtlTEl 
U3a » U JR HI,03fi: (PRIKTER? --> DRUCKEN 

UP dutch: IF) 

flllT ZEICHEN AUF DEN BILBSCHIM AUS 
IiA>AUSZUfiEBEHOES ZEICHEH 
0ir40Ai)«CUItSaRP0SITIM NACWER 
033A K PUSH BE )DE RETTEH 

•33B CB 33 W CALL 0033 |AU96ASE AUF BILBSCHIim 

033E FS PUSH AF tlEICHEH REHEN 

033F CB 48 03 CALL 034B iCURSOePOSlTIOH lESTINNEH 

0342 32 Ai 40 LB (40A&),A jUNO AB»>EICHG« 

034S Fl POP AF iieiCHEH ZUMJECK 

0344 Bl PW BE jBE ZURUECK 

0347 C9 RET 



UP CURPOS (AF) 

EM17TELT CURSDRPOSITIM IN DER ZEILE 
Ii(402e}>CUR30RAMESSE 

(403D)>PmTSTATU5 
OiA>CURSOimtSITIM 

I34B 3A 3S 40 LB A,(40») iPHTSTATUS LAIBI 

I34B Ei OB AND OS {32 CPL? 

034B3A20 40 LB A, (4020) {LSI BER CURSORADRESSE LABEN 

0390 21 03 JR Z,035S ;HEIH 

0332 OF HtCA ;JA, BURCH 2 

0333 a IF AM IF |KIB 32D 

•333 Ei 5F ANB 3F }NOB 64B (ZEILEMLAEHEE) , EB&IBT OiRSORPOSlTIDH 

0337 Cf RET 

UP 1KH2 (AF) 

SIEKE INCH 

eSN CB C4 41 CALL 41C4 

033B D3 PUSH BE {BE REHEH 

O3SCCfi2B0O CAU 002B {INCH 

e35F Bl POP BE jBE ZURUECK 

03i0 Cf RET 



UP 



INLINE IAF,BE-401B,HL) 
LIE3T ZEILE VON TASTATUR IN I/O^UFFU 
I)/ 

DtHL>I/0-BUFFERANF-l 
FiCV-1, HEHH BREK 

A )A4 

14099) , A t INKEyWHlSCHEH3PEICHER>0 

(40M),A ;CURS8RP0SITIDN=« 

41AF 

SC {BC RETTEH 

HL,(40A7) {l/D-BUFFERAHFANI LA8EN 

B.FO {240 ZEICHEH NUR'EBIAUIT 

HB9 {inUFF AUFRUFEH 

AF {FLAB RETTEH 

C,B iMIAHL BER EINBEBEIEHEH ZEICHEH NACH BC 

B.OO 

hL.BC jAUF BUFFEMWFMR ADDIEREH 

(NL),O0 {ZEMHEHBE NIT NARKIEREH 

HL, (40A7} {BUFFEMNFINB HACK ». 

AF I FLAG ZURUECK 

BC {K ZUMECK 

HL {BUFFERANFANB-1 NACH HL 

C (BREAK? ~> ZURUECK 

A {NEIN, AKKU-0 

UP INCHH2 lAF) 
SIEHE IIICHH 

03S4 CB 38 03 CALL 033B {INCH2 AUFRUFEHl TASTATUR ABFRASEH 

0387 B7 OR A {NBJE TASTE BEBRNECKT 

0388 CO RET HZ (JA. ZURUECK HIT CUBE IH A 

0389 18 F9 JR 0384 )C1H, HEITEN 

UP RE3PR (AF) 

AUSSABE-FLAS AUF DISPLAY UNB CR AUF DRUCKER, HEHH BRUCKKOPF HICHT IH POSITIIM 
Ii(409C)>AUSeABEFLA6 

(409B)*DRUCKi:8PFP0SITIQH 
Di/ 
038B AF lOR A {A>0 

038C32 9C40 LD (409C),A {AUSSABEFLAfi AUF BISPLAT 

SEITE 13 



03&1 AF 


IDR 


03U 32 99 40 


LB 


•3&S 32 A6 40 


LD 


03M CB AF 41 


CALL 


«3iB CS 


PUSH 


034C 2A A7 40 


LD 


03tf O&FO 


LB 


0371 CB B9 OS 


CALL 


0374 F3 


PUSH 


0373 48 


LB 


0374 06 00 


LB 


0378 09 


ABB 


0379 34 00 


LB 


037B 2A A7 40 


LD 


•37EF1 


POP 


037FC1 


POP 


t38t 2B 


BEC 


0381 D8 


RET 


0382 AF 


lOR 


0383 C9 


RET 



038F 3A 91 40 


LD 


A,I409BI 


iBRUCKKDPFPtlSlTIM HACH A 


0392 67 


OR 


A 


)«0? 


0313 C8 


RET 


I 


jJA, ZURUECK 


UP 


PRCR 


(A'OD) 






CR AUF ORUCKER AUSBEBEH 




liSIEHE PRIHTl 






DiSIEHE PRINTl 




0394 3E OB 


LD 


A.OD 
DE 


IMEIH, CR HACH A 
)DE RETTEN 


0396 D5 


PUSH 


0397 Cfi 9C 03 


CALL 


039C 


;AUF BRUCKER AUS6EBEH 


a39A Dl 


POP 


K 


\K ZURIKCK 


039B C9 


RET 






UP 


PRINTl 


1) 






ZEICHEN AUF DRUCKER AUSKKH 




l!A>AUS7U6EKHH5 ZEICHEN 




(409B)>DRUaCK0PFPBSlTI0N 




Otl409BI>Hll»KaPFPDSrTIOH HACHI€R 


039C F5 


PUSH 


AF 


;REBISTER RETTEN 


039fi D5 


PUSH 


K 




039E C5 


PUSH 


BC 




039f 4F 


LD 


C,A 


iZEICICN HACH C 


03M IE 00 


LB 


E.OO 
OC 


E=0 


03A2 FE OC 


CP 


■FF? 


03A4 28 10 


JR 


Z,03fii 


JA 


03UFE OA 


CP 


OA 


ILF? 


03M 20 03 


JR 


NZ,03A6 
A,OD 


INEIN 


OIAA 3E OS 


LD 


;JA, DURCH CR ERSETZEN 
;ZElCt£N ZUftUECK 


03M: 4F 


LD 


Si' 


03Afi FE 00 


CP 


;CR? 


03AF 28 05 


JR 


Z,03B6 


;MEIH 


0311 3A 9B 40 


LD 


A, I409B) 


iDRUCKKOPFPQSinw LADEN 


03B4 3C 


INC 


A 


;INC. 


03fiS 5F 


LD 


E,A 


;HACH E 


03U 7B 


LB 


I409B),A 


{UND HEUE POSITION ABSPEICHERH 


03B7 32 9B 40 


LD 




03B« 79 


LB 


0^3B 


;2EICHEH HACH A 


03fiB Cfi 3B 00 


CALL 


;PRIHT 


03BE CI 


POP 


BC 


jREBISTER ZURUECK 


03IF Dl 


POP 


BE 




ma Fi 


POP 


AF 




03C1 C9 


RET 







UP CALL 

RIFT I/O-RQUTIKN UEBEf) DCB AUF 

I:BC miss AUF STACK SEIN (!1 
B«DCB-TYP 

Dl/ 

UND BIE JENEILIGEN PARAMETER UHD REGISTERHEINFLU5SUN6EN 

03C2 ES PUSH HL gREBISTER RETTEN 
03C3 DD a PUSH II 

03CS D5 PUSH DE (K NACH IK KOPIEREH 

03Ci DD EI POP IX )(BCfi-ADfiESSE NACH II) 

03CB D5 PUSH I^ |DE RETTEN 

03C9 21 DD 03 LD tl,03DD ]RUECi(SPRUN6ABRESSE SETZEH 
03CC E5 PUSH HL 

03CB 4F LD C,A ;IEICH£H HAOI C 

03CE lA LD A, IDE) |BCB-TrP LABEH 

03CF AO AND B ;ftICHTIKS BIT 6ESETZT? 
03B0 BB CP B 

0301 C2 33 40 JP HZ, 4033 ;NEIH, A>0, RET 

03D4 FE 02 CP 02 :KEIHE DUTPUTRIHJTINE? --> CT SETZEH 

03Dt DB 6£ 01 LB L,(U^1I {TREIIERAMESSE LABEH (LSBI 

03B9 DD U 02 LD H,(IU02) {(NSB) 

03DC E9 JP (HL) ;TREIBER AHSPRIH6EH 





RUECKKEHR UBN BCB-AUFRUF 


03DD Dl 


POP 


BE ;RE6ISTER ZURUECK 


03DE DD El 


POP 


11 


03EO El 


POP 


HL 


03E1 CI 


POP 


BC 


03E2 C9 


RET 





TASTATURABFRAGE 

AH5PRUNG HUR UEBER IKH 

03E3 21 36 40 LD a, 4036 ; TASTATURSTATUSADRESSE HACH HL 

03Et 01 01 38 LD K,3e01 ;TASTATURADRESSE HACH BC 

03E9 16 00 LB D,00 {ZEILENZAEHLER 

SEITE 14 



03EI M 
03EC SF 

OIEE 73 
03EF A3 
03F0 20t» 
0IF2 14 
03F3 2I: 
UF4 CI 01 
03Fi F2 EB 03 
0SF9n 
03FA9F 
03FB7A 
03FC 07 
OSFI 07 
03FE 07 
03FF 57 

0400 OE 01 

0402 79 

0403 A3 

0404 20 05 

0406 14 

0407 CI 01 

0409 18 F7 

0401 3A BO 38 
•40E 47 

HOf 7A 

0410 C& 40 
0412 FE 60 
0414 30 13 



0416 » 08 
0418 30 31 
041 A C6 20 
041 C 57 
041D 3A 40 38 
0420 E6 to 
0422 7B 28 

0424 7A 

0425 D6 60 
0427 IB 22 



0429 06 70 
042130 10 
0420 C6 40 
042F FE 3C 
M31 38 02 
0433 EE 10 
0435 CI 08 
0437 30 12 
0439 EE 10 
0431 IBOE 



0430 07 
943£ CBOB 
04*0 30 01 

0442 3C 

0443 21 50 00 

0446 4F 

0447 06 00 
0449 M 
044A 7E 



0441 S7 

044C 01 AC OD 
044F a 60 00 

0452 7A 

0453 FE 01 

0455 CO 

0456 EF 

0457 C9 



M58 U U 03 



L9 
LD 

m 

LB 

AHO 

JR 

IHC 

IK 

RLE 

JP 

RET 

LB 

LS 

RLCA 

RLCA 

RLU 

LD 

LI 

LI 

AND 

JR 

INC 

RLC 

JR 

LI 

LD 

LD 

ADD 

CP 

JR 



A, (ICl 
E.A 
IM.) 
tHL),E 

HZ,03FA 

D 

L 

G 

P,05EI 

E.A 

A,l 



D.A 
C,01 

... 

U,040i 

C 

0402 
A, (38801 
I.A 

,? 

60 
HC,0429 



jEINE TASTATUfiZEM LADEN 

}IMCHE 

)AEW£fWI6E)i ERMITTELH IN-BITB) 

IHEUEH STATUS AMPEICHERH 

;AE»ERtM6 NEU SEMUECKTE TASTE? 

)JA, ASCII-CODE ERttlTTELN 

iZElLENZAEHLEIItl 

iSTATlSZEIBERtl 

iHAECttfiTE IEILEMME8SE 

(lis ALLE ZEILER KARKITET 

(ICEIHE mm TASTE, RUEKKEHR KIT A-0 

IZEIURIHFO MCH t 

jZElLENNRIB MCH I 

(ER6IIT BIT 3-5 DES A&CII-COBES 



iSTEUUNB lES BESETITEK BITS 11 E EWITTaH HIT 0-2)i BIT IH C SETZEN 
IBLEIOCS BIT IN C UNO lEILENINFQ KSETIT 

)M 

I III 0-2 ♦! 

IHAECHSTES BIT IH C SETZEN (C t 2) 

llEITER 

; SHIFT-TASTE ABFRA6EN 

iKHN GEBRUQIKT. B0=1 

IZUM VaUAeUFIllH CODE 40 ADDIEREN 

iBUCHSrUE? 
;HEIN 



BUCHSTAKH 



RRC 

JR 

All 

LI 

LD 

AND 

JR 

LI 

SUI 

JR 



B 

NC,044I 

20 

S,A 

A, (3840) 

10 

Z,044C 

0441 



I SHIFT? 

tNEIN 

|JA. LDHER CASE ERZEISEM 

lUM HIEIEfl NACN I 

iBOHH MtRM (SHIFT DDHN ARRON = COHTML)? 

(NEZN 

]CDDE LAIEH 
iCDNTROLCODE ERZEU6EH 
iNEITER 



ZIFFERN m SMBERZEICNEN 



SUI 70 iZIFFERN IWD SDNDESZEICHEHi COHTMLTASTE? 

JR HC,043B ;JA, CODE AUS TABELU ENTHEWCN 

ADD 40 iCDbEKQRREKTW 

CP 3C iTASTEH '<','>','>','?' 6E»UECltT? 

JR C,04J5 fNElR 

lOR 10 iJA, SKIFTIIT IHVERTIERQI 

R8C I )W1FT? 

JR HC,I44B tHEIN 

XOR 10 iJA, SHIFTBIT IHVERTIEREN 

JR 0*41 jHEITER 



COHTRELTASTEN 



RLCA 

RRC 

JR 

INC 

LI 

LS 

LI 

ADD 

LD 



I 

K,0443 

HI, 0050 

B,OD 
li,IC 
A, (HL) 



{TASTEMCOBE t 2 

(SHIFT? 

ttEIN 

jJA. COOEtl 

)TABELLENAHFAN6 HACH HL 

(OFFSET = 2tTASTEHC00E * SHIFT MCH BC 

(OFFSET ADDIEREN 
(CONTROLCOK EHTHEHHNEH 



EHDABFRA6E 



LS 

LI 

CALL 

LD 

CP 

RET 

RST 

RET 



D.A 
Bt.ODAC 

ma 

A,l 

of 

HZ 
28 



(ASCII HACH I RETTEH 
(51.3 RS VERZDEfiERUHG 

;ASCII-CSDE ZURUECK MCH A 

tlREAt:? 

iNEIN, ZinUECK 

)RST 28H AUFRUFEH (HIR NUR UNTER HS lEMnZT) 



BILISCHIRHAUSBAIE 

ARSRtlW HUR UEBER DUTCH 

LI L.dl^S) (CURSORAmsSE LADEN 

SEITE 15 



04SB OD 66 04 

04X 38 3A 
0460 » 71 OS 
9463 B7 
M64 2S 01 

0466 77 

0467 79 
046S FE 20 
04MIM 06 0S 
046fi FE SO 
046F 30 33 
0471 FE 40 
0473 3S 08 
0475 U 40 
0477 FE 20 
0479 38 92 
0471 U 20 
0470 CD 41 03 
MM 7C 

0481 E6 03 
M83Fi3C 

«4n*7 

0486 S6 

0487 Dfi 7E OS 
04BII 87 

0488 28 03 
0488 BS 72 OS 
0490 U SF 
0492 U 75 03 
0495 81 74 04 

0498 79 

0499 C9 



049A » H 05 
0491 87 
049E CO 
049f 7E 
04MC9 



04A1 71 
04A2 E6 CO 
04M6F 
04A3C9 



04A6 FE CO 
04U 38 D3 
44Ult6 CO 
04U 28 D2 
04W47 
04tf 3E 20 
0481 Cfi 41 03 
0414 10 F9 
0486 IB Ce 



04B8 7E 
04Bf DB 77 05 
04BCC9 



04BB AF 
04BE 18 F9 



0400 21 OO 3C 
04C3 3A 30 40 
04C6 E6 F7 
04C8 32 3D 40 
04CI D3 FF 
04CDC9 



04CE 2B 
04CF 3A 30 40 
04D2 E6 OB 
04D4 28 01 



LB 

JR 

LB 

Qf) 

Jit 

LB 

LB 

CP 

JP 

CP 

JR 

CP 

JR 

SUB 

CP 

JR 

St» 

CALL 

LB 

AND 

Oft 

LB 

LB 

LB 

OR 

JR 

LD 

LB 

LB 

LD 

LD 

SET 



H, (11+04) 
C,049A 
A, (11+05) 

Z,0467 
IHL),A 

C,0506 

80 

HC,04A6 

40 

C,047D 

40 

20 

Z.Wl 

Si 

0541 

A.H 

03 

3C 

H,A 

D,IHL) 

A, (IXtOS) 

Z.0492 

l]I*05),B 

(HLI.SF 

(IX+03),L 

(11+04), H 

S,C 



:NACH HL 

iCY? -> SPftUNB 

iCURSOROH? 

IMEIH 

;JA, ALTtS ZEICHEH tilf CURSOtlPQSITIDM 

iZElCHEN HACH A 

;CMTROLCODE? 

IJA 

I6SAPH1C OBER SPACE COHPRESSIOM? 

;JA 

iBUCHSTABE? 

{NEIH 

;IIACH 0-3F TRMSFORHIEREH 

;LOWR CASE? 

jKIH 

i IK UPPER CAS unMHBELN 

gllLVIBEOftM UM SCROLL, KM NOETIG 

)CURS« IN VIKOdAHi 

;BIT 10-15 EHTFERHEN (HOD 10241) 

;BURCK 3C ERSETIEN 

lIEICHEH AUF NEUEfl CUftSOfiPOS. NACH D 
tClKSOft OH? 

|KIX 

iJA, ZEICHEH ABSPEICHERN 

ilW BIRCH CURSOR ERXTZEN 

jHEtE CURSWABRESSE ADSPEIUEM 

ilHSB) 

{ZEICHEH lURUECK IH AKKU 



ZEICKEN AUF CURSDAPDSITION LABEH 
LB A,(n+05) iCURSORON? 
OR A - 

RET HZ 
LD A, IHL) 
RET 



)(HEHH JA, ZEICHEH AUF CURSOfiPOSITION IH A) 

iJA 

IZEICHEH AUF CURSORPOSITION LABEH 



CURSOR ZUH MFAHG DER ZEILE 

LD A.L ;LS6-CIIRS0R HACH A 

ANB CO ;8IT 0-5 1=P0SITI0H IH BER ZEILE) =0 

LD L,A [ZURUECK 

RET 



SPACE CDHPRESSIOH UNB HIAPHIC 



CP 

JR 

SUB 

JR 

LB 

LD 

CALL 

BJKZ 

JR 



CO 

cd 
z,04eo 

S,A 
A. 20 
0541 
04AF 
0480 



CURSOR ON (OE) 
LD A. IHL) 

LD (n+OS),A 

ft£T 



;8RAPHICC0DE? 

I J A, AUSGEKH 

I-CO ER6JBT AHZAHL DEf) LEERZEICHEN, =0? 

jJA 

[ANZAHL HACNB 

f SirnLc PWLH n 

lAUSGEBEH 

)B HAL HIEBERHOLEH 

;ZURUECK 



iZEICHEH AUF ClASORPDSITION LADEN 
lUHD ABSPEICHERH 



CWSOR OFF 
XOR A 
JR 0489 



(OF) 



]A>0 

}KITER, ABSPEICHERH 



CURSOR HOHE (64CI1) 110 



LD 

LD 

AHD 

LD 

OUT 

RET 



HL,3CO0 ;CURSH> VIBEORANMFAHGABRESSE 

A,I403B) ;POftTSTATUS LADEN 

F7 ;B1T 3 LOESOCH D.H. 64 CPL 

(403D),A ;PORTSTATUS HIEDER ABSPEICIffRH 

FF ;UHD ALH" PORT 255 MIS6EBEH 



BACKSPACE I OB) 
DEC HL 
LD 
AHD 

JR 



A, 14030) 

OB 

I,04D7 



{CURSOR EIH ZEICHEN ZURtlECX 
jPORTSTATUS LABEH 
;32 CPL? 

)MEIN 

5EITE 16 



04U 2B KC HL jJA, CURSW WO EIH ZEIC(£N ZURUECK 

0417 U 30 IB lli),20 ;IEICK£H nn SPACE UEBERSCHREIIEK 

04H C9 RET 

CURSOR BACK (IS) 

04BA 3A 3D 40 LD A,(403D) jPDRTSTArUS LMEH 

04DB Ei 08 AND W )32 CPl? 

a4DF C4 E2 04 CALL NZ,04E2 ;JA. CIMSOR EIN IKITES lEICHEN ZURUECK 

04E2 7B LB A.l |LSk-CU»OR MCH A 

UE3 Ei 3F AW 3F |CUR30R AUF l.ZEICKN BER ZEILE? 

04E5 2B KC HL ;CtltSOR EIH ZEICHEH ZUMCCK 

e4Ei CO RET HZ fKlU, FERTI6 

CW50R BOtW UA) 

04E7 11 40 00 LD DE,0040 { ZEILENLAEWE MCH DE 

04EA 19 ABD HL,BE )ZUH CURSOR ABBIEREH 

04EB C9 RET 





CURSOR ADVANCE (19) 


^ 


0KC23 


IHC 


VL 


{CURSOR EIH ZEICHEH HEITEfi 


04ED7S 


LB 


5f^ 


; CURSOR IH SPM.TE 0? 


04Ee E6 3F 


A« 




04F0C0 


RET 


HZ 


iNEIfl 




CURSOR DOW (IB) 




04F1 11 CO FF 


LD 


DE,FFCO 


)-ZEILEHLAEH6E HACH DE 


04F4 19 


ADD 


fl,DE 


IZEILEHUEHGE VOH CURSOR SU&TI 


a4FS C9 


RET 








32 CPL 


(17) 




04F6 3A 3B 40 


LD 


A, (4036) 
08 


;PORTSTATUS LADEN 


04F9 F6 0e 


OR 


;BIT 3 SETZEH (STEUERT CPL) 


04FB 32 3D 40 


LD 


(403B),A 


;HEUEK P0RTSTATU3 ABSPEICHEMt 


04FE D3 FF 


OUT 


FF 


;UHD MIF PORT 255 AU&6EBEH 


OSOO 23 


INC 


KL 


; CURSOR INC. 


0501 7D 


LD 


fV 


(UNB SIT LDESCHEM 


0502 Ei FE 


AM) 




0504 ^ 


LD 


L,A 




OSOS C9 


RET 







AUFRUF BER COHTROLCODES 

OSOi 11 80 04 LD D£,0480 j RlEt^SPRUNGABRESSE SETZEH 

0509 05 PUSH DE 

050A FE 06 CP 06 ; BACKSPACE? 

OSOC 28 CO JR Z,04CE {JA 

050E FE OA CP U ;< LF7 

0510 D8 RET C )JA, RET 

0511 FE OE CP OE {< OE? 

0513 38 4F JR C,05M jJA, CR lOA.OB.OC.OD) 

0515 28 Al JR Z,04BB ;-(£? -> QH30R ON 

0517 FE OF ZP OF |ClttSOR OFF? 

0519 28 A2 JR Z.04BD ilH 

0511 FE 17 CP 17 ;32 CPL? 

051B 28 D7 JR Z,04F6 ;JA 

OSIF FE 18 CP IB ;BACK? 

0521 28 B7 JR Z,04DA )JA 

OS23 FE 19 CP 19 ;ADVANCE? 

0S2S 28 C5 JR Z.04EC jJA 

0527 FE lA CP lA (DEM? 

0529 28 BC JR Z.04E7 ;JA 

052B FE IB CP li tUP? 

052D 28 C2 JR Z,04F1 ;JA 

052F FE IC CP tC |HDHE? 

0531 28 SD JR Z,D4C0 iJA 

0533 FE ID CP IB jANF OF LINE? 

0535 CA Al 04 JP Z,04A1 iJA 

0538 FE IE CP IE )ERASE TO END LIKE? 

053A 2G 37 JR Z,0S73 iJA 

053C FE IF CP IF )CLE«R TO EHD OF FRAME? 

0S3E 28 3C JR Z,057C tJA 

0540 C9 RET 

ZEICHEH AUF BILDSCHIRH 

0541 77 LD (HL),A jZEICHEH AUF CURSORPOSITIOH ABSPEICHENN 

0542 23 INC Va gCURSOR EIH ZEICHEH NEITER 

0543 3A 3D 40 LB A,I40^I {32 CPL? 
0546 E& 08 AHD 08 

0S4fl 28 01 JR Z,054B )«£» 

054A 2} IHC HL ;JA, WCH EIH ZEICHEH HEITER 

SEITE 17 



054B 7C LD A,H gCURSIM AUSSERHALB DES VIHQRM? 

«4C FE 40 CP 46 

aS4E CO RET HZ gNElH, FEflTIB 

SCROLL 

«4F 11 CO FF LS DE.FFCO i-ZEILEitt.AEItGE HACH DE 

05SZ 19 ADD HL.DE {ZEILENLAENGE VDN CURSOR SU8TMHIEREH 

0553 ES PUSH HL iHEUEM CURSOR RETTEN 

0554 11 00 3C LD DE,3C00 jBILBSCHIfitMNFANG = ZIELADRESSE 
45S7 31 40 3C LD HL,3C40 ;2.ZEILEHIUFAH6 = OUELLADRESSE 
OSSA a PUSH 6C :BC RETTEH 

0S3B 01 CO 03 LD BC,03C0 |H.D0(LAEH6E = BILDSCHIRHLAEIiee - 2E1LEIMEH6E 

teSE El BO LDIR iH.DCnRM6FER 

0960 CI POP BC )BC ZURUECK 

«61 EB EX DEjHL ;ANFAK6 DER lETZTEN ZEILE HACH HL 

0542 18 19 JR 057B_ ;LETZTE ZEILE LOESCHEH 

CD <OA,OB,OC,ODi, 

0564 7D LD A.L iCURSDR ZUH AHFAHG DER ZEILE 

0565 E6 CO AND cd 

0567 6F LD L.A 

0568 E5 PUSH HI ; RETTEH 

0569 11 40 00 LB fiE,004ft ;Z£ILENLKH6E HACK BE 

056C 19 ADD HL.DE gADOIEREH, ER6IBT NEUEH CURSOR 

056D 7C LD A.H ;BILDSCHIRHEHBE ERREICHT? 

056E FE 40 CP 40 

0370 2S E2 JR Z,0554 {JA, SCROLL 

4572 01 PW SE jIEleER AUF AHFMS QEfi M.TE)t UILE ZtHtUECK 

ERASE TO EHB OF LINE (IE) 

0573 ES PUSH HL ] CURSOR RETTEN 

0574 54 LD l,H jZEIGER AUF EHDE DER ZEILE HACK DE 
0375 7D LB A.L 

0576 F6 3F QR 3F 

0578 SF LD E.A 

0379 13 IHC DE [ZEIBER AUF AHFAttG DER HAECKSTEH ZEILE 

057A IB 04 JR 05fi0 ;BIS ZUH EHBE LDESCfCH 

CLEAR TO END OF FRAHE (IFl 

057C ES PUSH HL ;CUfKQR RETTEN 

0S7D 11 00 40 LD DE,4000 jBILBSCHlRHEHOE HACH DE 

OS80 36 20 LB (HL1,20 [LEERZEICHEN SCHREIBEH 

0582 23 INC HL ;ZE16ER INC. 

0583 7C LD A,H ;nSB = HSB EHDADRESSE? 

0584 BA CP D 

0505 20 F9 JR HZ.DSaO jMEIH, HEITER 

0587 7D LD A,l ;LSB = LSB ENDABRESSE? 

0568 BB CP E 

0389 20 F5 JR HZ, 0380 ;NEIII, HEITER 

0585 El POP HL ;CUR5M ZURLCCK 
05BC C9 RET 



DRUCKERTREIBER 

AKSPRUW MUR UEBER PRINT 

neO 79 LB A,C ;ZE1CHEN REHEN 

058E B7 DR A i>0? 

05BF 28 40 JR Z.OSDl :JA, HIT DRUCKERSTATUS IN A ZlfiltECK 

0591 FE OB CP OB ;FF? (Itlfifi INNER AUSBEFUEHRT) 

0593 29 OA JR Z,05ff iJA 

059S FE OC CP K iFF? (NUR HENN ANZAHL m ZEILEH PRO SEITE > 0) 

0397 20 IB JR NZ,05fi4 ;KIH 

0599 AF IDR A lA-O 

039A D6 B6 03 OR (IU03) ;ANZAHL DER ZEILEN PRO lEITE «07 

059D 28 15 » Z,05B4 |JA, MWHiLE AlffiSAS 

059F DB 7E 03 LB A, (11+03) ]ANZAHL DER ZEtLEN PRO SEITE - ZEILENNR 

0SA2 DD 96 04 SUB (U+04) 

05AS 47 LD B,A :HACH D 

0SA6 CD Dl 05 CALL OSDl iDRUCKER BEREIT? 

0»9 20 FB JR )tZ,05A6 eNEIH 

05AB 3E OA LD A.OA :LF NACH A 

OSM 32 E8 37 LD (37Ee),A iAUSBEIEN 

05K) 10 F4 DJNZ 05A6 :WITER BIS AUF NAECHSTER SEITE 

0512 18 18 JR 03CC ;ZEILENZAE11ER=0, ZURUECK 

NORHALE ZEICHENAUSSABE AUF BRUCKER 

0»4 FS PUSH AF iZEICHEH RETTEN 

ten CB Dl 05 CALL OSDt ilffiUCKER BEREIT 

0518 20 FB JR HZ,05B5 lUIN 

0»A Fl POP ftF jIElCKEN lUtUEU 

SEITE 18 



tauziav 


u 


(37EB>,A 


jMlSSEKII 


•SK FE 00 


CP 


01 


|U7 


09C« CO 


KT 


HZ 


IKIH 


«C1 H H 04 


INC 


m+«4) 


lIEILEMM * 1 


UC4 Bl 7C M 


LI 




(ZEILEM) ■ MZML HI lEILiN P« SITE 


«0C7 II K 03 


ff 




09U71 


U 


.V 


IZEICMB MCM A 


nan 


KT 


|KIH 


09CCH UM 00 


LI 


(IItM),04 


|JA, ZEILDM > 


tSMCT 


KT 






ur 


nniT 


(tfl 






TESTET H MUCKER BEKIT 

1 > > 




It/ 

Oil>l, 


KM HinXI KV IT 


05B1 U E6 37 


LI 


A, (37ESI 


)DWCXEX8TATU9 LAKH 


MMEi FO 


MO 


llITS 3-7 HQUUSIlfnEll 


094 FE » 


(? 


U 


IHOT mST -> I-l 


«QM n 


KT 







ur inUFF IAF,K,K<4C1D) 

EIICAK EIKR JEILE IN DEN UFFEfl 
IiiMHlINALE ANZAM. Kl EINZMCKiaEtt ZEIDO 

HL'NFFEUMFAHHHEBK 
OiHWZAM. KR TATHECM.IU EINKKXiei ZEICMEN 
C«MIINMi MZAHL H EIXZUKKMa ZEICHEN 



KM ES 


PUSH 


H. 


INFFEUVAW RETTEN 


HH 3£ oe 


LD 


A.OC 

0033 


ICURSOR Oi 


OSK CB 33 00 


CAU 




OSDf U 


LB 


^9 


|HI EIHSAKIEICKX NACM C 


•9E0 CB 49 00 


CALL 


IHAKTEH lis HEUE TASTE BEMIECXT, COK IH A 


0X3 FE » 


Cf 


20 


|C«TRBLC8K? 


•5E5 30 23 


JR 


K,064C 


)KIH 


0SE7 FE OS 


CP 


OB 


1 ENTER? 


OSEf CA i2 Oi 


JP 


Z.0662 
1^ 


JA 


HEC FE IF 


CP 


iCLEAR? 


«f f a H 


JR 


1,0619 
01 


JA 


03FO FE 01 


CP 


; BREAK? 


09F2 21 &B 


JR 


Z,0661 
K.OXO 


JA 


0SF4 11 EO OS 


LI 


iRUECXBnHMGADKSSE KTZEH (HAECHSTES lEICHER) 


«f1 K 


PUSH 


K 




isFSFE oe 


CP 


08 


1 BACKSPACE? 


OSFA» 34 


JR 


1,0630 
Id 


JA 


HFC FE IB 


CP 


tUFAR INPUT? 


09FE 21 21 


JR 


1,0621 
99 


JA 


MOO FE 09 


CP 


I TAB? 


H42 28 42 


JR 


Z,0646 
19 


IJA 


ti» FE 19 


CP 


(32 CPL? 


Wi 21 39 


JR 


Z.OMl 
M 


|JA 


0U8 FE OA 


CP 


LF? 


ftMA CO 
0601 Dl 


KT 
POP 


HI 
K 


|KIN, HAECHSTES ZEICHEN 
iRUEnSPMMAIKSX ENIFEMEM 


OMC 77 


LB 


(ML), A 


;ZElCHa IN WFER 


OWB 78 


LB 


A,l 


IZEICKNZKMLEIH)? 


«ME 87 


» 


A 




OMF 28 CF 


JR 


Z.OSEO 


|JA, HAECHSTES ZEICHEH 
iZEICta AUS SUFFER 


0611 7E 


LB 


A,(HL) 


0612 23 


IK 


KL 


|l»FtRI. IK. 


0613 CB 33 00 


CALL 


0033 


;ZEICtEN AUSSEKN 


0616 OS 


KC 


8 


IZEICKHZAEHLER - 1 


0617 18 C7 


JR 


OS£0 


(NKCHSTES ZEICHEN 




aEW 






0619 CB C9 01 


CALL 


01C9 


llILISCNIRfl LKSCKN 


UlC 41 


LB 


8,C 


INAI ZEIOOANZAHL HACH 8 ZURUECK 


061B El 


POP 


m! 


IBUFFEMHTAM IIMECK 


061E ES 


PUSH 


HL 


|IMI HIEKR RETTEN 


«61F C3 EO «S 


JP 


OSEO 


JREUE EIH6RK 




CLEAR IVUT 




0622 CI 30 06 


CALL 


0630 


1 BACKSPACE 


062S 21 


KC 


M. 


;HAECHSTE9 ZU LKSCHEHK ZEICHEN * LF? 


0626 7E 


LI 


A.ltL) 




•627 23 


IK 


Hi! 




0621 FE 0* 


CP 


OA 




•62AC8 


KT 


z 


|JA, FOTIB 

ILETZTEI lEICKN 6ELKSCHT? 


0628 78 


LJ 


A,l 


«62C 19 


CP 


c 


|(NU ZEIOfHZAHL ■ ZEICMENZAFWFR)? 


1628 20 F3 


JR 


HZ, 0622 


iKIH, NEITQ 



SEITE 19 



tAHf M 



4&S0 78 

0631 n 

0432 ca 

0433 21 
0U4 7E 
OUSfE OA 
U3T 23 
0438 Cfi 
0U9 2I 
0A3A3E0I 
043CCD 33 00 
OUF 04 
OMCn 



MT 

BACKSPACE 
LD 

a* 

ItET 
KC 

LB 

Cf 

IW 

RET 

lEC 

LQ 

CALL 

IHC 

KT 



1 

ML 

A,(HL) 

» 

HL 

I 

HL 

A,OB 

0<033 

B 



)IEICHEM IK BUFFER? 

I KIN, FERTie 

)Vi LK5CHENSEB lElCHEN LF? 



(JA, FERTIB 
;BtlFFE)IZEIEa BEC. 
tIKKSPKE MISiEIEN 

IZEICHENZAEHLER * 1 



9641 X 17 
0643 C3 33 00 



0646 CD 49 03 

0649 Ei 07 
064B 2F 
064C 3C 
064B C6 06 
064f 5F 

0650 7B 

0651 fi7 

0652 C8 

0653 X 20 
M55 77 

0656 23 

0657 D5 

065S CB 33 00 
465BB1 
OtSCK 
USB IB 
06SECB 
M5F IBEF 



«4fal 37 



0U2F5 
«663 3E0g 
0669 77 
0U6CD33W 
0669 3E OF 
I64BCB 33 00 
066E79 
066F 90 
4670 47 

0671 Fl 

0672 El 

0673 C9 



0674 03 FF 
0676 21 D2 06 
0679 II 00 40 
067C 01 36 00 
067F EB 60 
06B1 3D 

0682 3B 

0683 20 Fl 
0689 06 27 
0687 12 
0689 13 
46S9 10 FC 



0688 3A 40 38 
468E E6 04 
0690 C2 75 00 
0693 31 7B 40 



32 cn. 

LB 
JP 



A, 17 
0033 



;AUF 32 CPL im&CtMLTEX 



TAB 

CALL 

ANB 

CPL 

IltC 

ABD 

LB 

LB 

OR 

RET 

LD 

LD 

INC 

PUSH 

CALL 

POP 

BEC 

DEC 

RET 

» 

IREAK 
SCF 



0348 
07 

A 
08 
E.A 

r 

I 

A,20 

(HL),A 

M. 

BE 

0033 

DE 

B 

E 

I 

0650 



iCURSDftPOSITQN HACH A 

lM» 8, ERSIBT lEICHEN SEIT LETZT« TAB POSITION 

;VON 8 ABZIENEN EMIBT ANZAHL BER EINZUFIJE8ENDEN SPACES 



;NACNE 
)Btfm VDL17 

I J A, PERT IS 
iSPAU NACH A 
I IM BUFFER 
{BUFFEfiZ. INC. 
;BE RETTEN 
tAUSSEBEN 
fBE ZURUECK 
gZElDCNZAEHLER DEC. 
ISPACEANZAHL BEC. 
)RET, KMI 
;WllER 



)FlAe SETZEM IC-l) 



ENTER 

PUSH 

LB 

LB 

CALL 

LB 

CALL 

LB 

SUB 

LB 

POP 

POP 

RET 



K TFLK RETTEN 

A.OB t" IN AKKU 

(HL),A ; IN BUFFER 

003? ]fttl56EflEN 

A.OF {CURSOR OFF 

M33 

A,C }MI AHZAML - ZEIDEHIttlER 

B.A )ER6IBT ANZAHL BER EIN6E6EBENEH ZEICHEN IN B 

K }FLft6 lURUECK 

HL ;BllFFEUNFMfi ZURUECK 



SYSTBtlNITIALISIERUHS 

BCB, RST-VEKTOREN IN KM UEBERTRAGEH 



(KIT 

LB 

LD 

LD 

LBIR 

BEC 

BEC 

JR 

LD 

LD 

IHC 

DJNZ 



FF 
HL,06D2 
BE, 4000 
K,0036 

A 
A 
NZ,0676 

(BE), A 

BE 

0667 



iPOtT ZURUECKSETIEN 

;ABRESSE DES BLOCKS JH RON (OUELLADRESSEI 

(ZiaABRESSE IN RAH 

tILOCKLAENGE > 36 

)n.0CKTRAN8reR 

;128B HAL 

{NIEDERHOLEN 

gDIE FOLKNBEN 27 BYTE LOESCHEN 

1(4036-4050 



BASIC USER BOS 



LD 
AND 
if 
LB 



A, (3840) 
04 

NZ,0075 
SP,407D 



(BKAK UDRUECKT? 

IJA. BASICIN1TIALISIERUN6 
iSTKK INITIALISIEREN 



SEITE 20 



U9A U EC 37 
WW3C 
mn FE 02 
U9C DA 75 00 
06^ 3E 01 
06A1 32 El 37 
0M4 21 EC 37 
0U7 n Ef 37 
OUA Zi 03 
06AC 01 00 00 
OAAF CD MOO 
0U2 CBU 
Oil* 20 FC 
mi AF 
0U7 32 EE 37 
OASA 01 00 42 
O&BD 3E 8C 
04BF 77 
OiCO CB 4E 
0M:2 28FC 
0U4 lA 
0AC5O2 
06Ci OC 
0iC7 20 F7 
0W9 C3 00 42 



0^ 01 IB lA 
OM^ C3 AE 19 



0U2 CI 9& IC 
0U» C3 7B ID 
OABS C3 90 iC 
06DB C3 D9 25 
06SE C9 
06DF 00 
06E0 00 
OAEl C9 
0&E2 00 
0^3 00 
06E4 FB 
0^ C9 
06E6 OO 



0iE7 01 
06EB E3 03 
OiEA 00 00 00 
im 41 49 



OtfF 07 
Otf SB 04 
06F2 00 3G 
0iF4 00 
06F5 44 4F 



06F7 Hh 
OiFB 3D 05 
Ufh 43 
O^B 00 
O&FC 00 
06FD 50 52 

OtfF CI 00 50 

0702 E7 

0703 00 

0704 00 



LB 

IKC 

CP 

JP 

LB 

LD 

LD 

LD 

LD 

LD 

CALL 

BIT 

JR 

IDR 

LI 

LD 

ID 

LD 

BIT 

JO 

LD 

LD 

INC 

JR 

JP 



A, II7EE:} 

A 

02 

C,0075 

A, 01 

(37E1),A 

HL,37Eb 

D£,37EF 

(Hl),ai 

BC,0000 

0060 

0,(HL) 

W,0U2 

I37EE),A 

BC.4200 

A.fiC 

1,(HL) 
2,0bC0 
A,(DE) 
(K),A 

N2,06C0 
4200 



BASIC-HRRSTART 
LD BC.IAIB 

JP 19AE 



;FDC AWeSCHLDSSEH? 



;NEIH, BASICINITIALISIERUH 
;FLOPPY AMNAEHLEH 

;FDC CHD/STATUS ABRES5E NACH HL 
;FDC DATEHADRESSE NACH DE 
]FDC STEUERItMT 
;960 nS HfiTEH 

;FLOPPY BEREIT? 

}HEItl 

; SECTOR ANHAEHLEN 

;STARTADRESSE DES URLADERS 
ISTEIKRNORT AN FDC AUSGEBEN 

;BYTE BEREIT ZUR UEBER6ABE? 

;NEIH 

;BYTE VON FOC UEBERHEHHEH 

;UW A8SPE1CHERH 

;ZEI6ER+1, SECTOR EINBELESEN7 

)KIH, UEITER 

jURLADER STARTEN 



IHAIPTSCHLEIFEMDRESSE HACH DC 

{SPRUNG IN HEN-BEFEHL, STACK N£U EINRICHTEN UND ZUR HAUPTSCKLEIFE 



DATEN im TRANSFER IN RAH 



RESTART -VEKTOREH 



JP 

JP 

JP 

JP 

RET 

HOP 

HOP 

RET 

HDP 

NOP 

EI 

RET 

NOP 



lC9i 
1D7B 
1C90 
25D9 



jRST OG-VEKTOR 
[RST 10-VEKTOR 
tRST IG-'^KTQR 
(RST 20-VEKTOR 
I RST 28-KKTOR 



!«aT 30-VEKTM 



iRST U-VEKTIM 



DCB'S 
KEYBOARD-DCB 



IBCB-TYP 
iTKIKRAMEGSE 

ilJNKRUTIT 



KI 



DISPLAY-BCD 



;DCB-TVP 
jTREIBERADRESSE 
;CURSDRADRESSE 
lUHBENUTZT 



DO 



PfilNTER-DGB 



iDEB-TYP 

ITREIKRAMESSE 

IZEIUH/SEITE 

tZEILENZAEMiJ) 

;UNBENUTZT 



PR 



JP 
RST 
HOP 
NOP 



5000 
00 



)H. V. (WTER DOS DOS-ENTRY, SIEHE RAH-ADRESSEN) 



HIRD VON CALL BEI FALSCHEH BIT IN DCI-TYP ANGESPRUNGEN 
0705 3E 00 LD A,00 lA ■ 
0707 C9 RET 



UP 



SINGLE PKCISIDH ARITHHETIK 
SADD2 [AF,IC,DE,HL) 



SEITE 21 



SIHBLEADDITIM: 1 ' U * O.S 
I:I>SUNMNO 

oii>sumE 

0708 21 80 13 LD__ HL,1380 ;ASRESSE HR KONSTANTE O.S IN ROfl 

Uf> sahh: iaf.bc.ce.hli 

SIWLEMISTiaNi 1 = C * U 

liI*SUHNAW 
HL<2EieER AW SUmMDEH 

0;l'SUmE 
0708 CB C2 0? CALL 09C2 jKOMSTflUTE (HL..) NACH 1 

070E IB 06 JR 0716 ;SPftUHG ZUR ADDITION 

UP SSISC lAF.BC.DE.KL) 

SINeLESUBTAAKTIM; Z = C - Zl 
Iit<SUSTRAHEHD 

HL-ZEIBER WF HIHUEItDEH 
0:II-D1FFERE»IZ 
0710 U C2 09 CALL 09C2 iKDHSTAHTE (HL.J HACN Y 

UP SSUBY (Af.BC.H.HL) 

SIKLESUBTRKTION: Z ■ Z2 - Zl 
Ii]|=SUSRAKM) 

r>tiimcn 

QtX-DIFFEKHZ 
0713 CD fl! 09 CALL 0982 {Zl = -Zl 

UP SADDY (AF.BC.OE.HL) 

SIKLEADDITIW: Z > Z2 + Zl 
Itl'SUHMW 
Y>SUmANfi 
D:X=SUNK 

0716 7fl LD fl,fl jZ2 = 0? (EIP Y « OJ 

0717 B7 OR A 

0718 CB RET Z jjfl, FERTI6, Z»Z1 

0719 3A 24 41 LD A, 141241 fZl = 0? (EIP I « 0) 
071C B7 OR A 

071D CA B4 09 JP Z,09B4 jJA, FERTI6, Z»Z2 (Y HflCH I) 

0720 90 SUB B .-EKP Zl - ElP Z2 HACH A, EIP Z2 <= EXP Zl? 

0721 JO OC JR KC,072F ;JA 

0723 2F CPL j-EIP DIF NACH A 

0724 3C IRC A ;UND Zl UHD Z2 VERTAUSCHEN 

0725 EB EI DE.W. ;HL NACH DE RETTEH 

0726 CD A4 09 CALL 09A4 ;I AUF STAU 
0729 EB EI DE.HL jHL ZURUECK 
072A CD B4 09 CALL 09B4 jY NACH I 
072D El POP BC jSTACK NACH Y 
072E Dl POP DE 

072F F£ 19 CP 19 jEXP DIF > HAKTISSENLANSE? (24D-BIT6) 

0731 DO RET NC jNEIN. I » I, FERTIB 

0732 F5 PUSH AF [EIP DlF RETTEN 

0753 CB OF 09 CALL 09DF ;SIGN-BITS BURCH 1 EftSETZEN, A7=l KMN &I6N 6LEICH, SONST 
0734 67 LD H.A ;SI6NFLA6 RETTEN 

0737 Fl POP AF jEIP DIF ZURUECK 

0738 CD B7 07 CALL 07D7 ;Y UN DIESE AHZAHL NACH RECHTS VERSCHIEBEH 
073B B4 DR H ;VDRZEICHEN BLEICH? 

073C 21 21 41 LD HL,4121 ;LSB I-ADRESSE HACH \i. 
073F F2 54 07 JP P,b754 iHEIH, SUBTRAKTION 

ADDITION DER RANTISSEN 
0742 CD B7 07 CALL 0787 iHANTISSENMDITION, UEBERLAUF? 
074S D2 96 07 JP NC,0796 ;NE]H 

0748 23 INC HL ;ZEI6ER MF EIP I 

0749 34 IHC (HLl ;EIP I * 1. UEBERLAUF? 
074A CA B2 07 JP Z,07B2 )JA, OV-ERftOft 

D74D 2E 01 ID L.Ol ;IIANTISSE VIM I UN EIN BIT RECHTS SCHIEBEN 

074F CD EB 07 CALL 07EB 

0752 18 42 JR 0796 jFERTIS 

SUBTRAKTION DER HANTISSEN 

0754 AF lOR A ;NY - HI NACH NY, NIEBERNEIITISSTES BYTE SUBTRAHIEREN 

0755 90 SUB B ;(DURCH VERSCHIEBEN EHTSTAHKNI 

0756 47 LD B,A jER6 

0757 7E LD A,IHL) iLSB 

0758 9B SBC E 

0759 5F LD E,A 

075A 23 INC HL ;ZEI6ER INC. 
07SB 7E LD A,IHL) :LSB 
075C 9A SBC D 

SEITE 22 



075D 57 
075E 23 
075F 7E 

0760 79 

0761 4F 

0762 DC C3 07 



0765 68 

0766 63 
0747 Iff 

0768 47 

0769 79 
076AB7 
0761 20 18 
076D M 
076E 34 
076F 65 

0770 6F 

0771 78 

0772 D6 08 
0774 FE EO 
0776 » fO 



LD 
INC 
LD 
SBC 
LD 
CALL 



UP 



0778 AF 

0779 32 24 41 
077C C9 



0771 05 
077E 29 
077F 7* 

0780 17 

0781 57 

0782 79 

0783 BF 

0784 4F 

0785 F2 7D 07 
0788 78 
07B9 K 

078A 4S 
078B B7 
07BC 28 08 
078£ 21 24 41 

0791 86 

0792 77 

0793 30 E3 

0795 CB 

0796 78 

0797 21 24 41 
079fl B7 
079B FC A8 07 
079E 46 
079F 23 

07» 7E 
07A1 E6 80 
07fl3 ft9 
07A4 4F 
D7H C3 B4 09 



07U IC 
07*9 CO 
07U 14 
07AB CO 
07AC OC 
07AD CO 
07AE 0£ 80 
07B0 34 
0711 CO 



07B2 IE Ofl 
07B4 C3 A2 19 



D,A 

HL 

A,(HL) 

c 

C,A 

C,07C3 



IDRHALISIERIMB 



LB 

LD 

IDA 

LD 

LD 

OR 

K 

LD 

LD 

LD 

LD 

LD 

SUB 

CP 

JR 



L.B 
B,A 

'/ 

NI,078S 
D,H 

EO 
MZ,0768 



IDR 

LD 

RET 



A 
14124), A 



DEC 

ADD 

LD 

RLA 

LD 

LD 

ADC 

LD 

JP 

10 

LD 

LD 

OR 

JR 

LD 

ADD 

LD 

JR 

RET 

LD 

LD 

OR 

CALL 

LD 

IHC 

LD 

AMD 

)0R 

LD 

JP 



B 

A,^ 

B,A 

C,A 
P,077D 

2,0796 
HL,4124 

Ifti.1 

(HD.A 

HC,077B 

A.B 
HL,4124 

N,07Ae 

B.IHLl 

HL 

A.IW.) 

BJ 

C 

0^B4 



RUNDUHG 

INC 

RET 

IK 

RET 

INC 

RET 

LD 

IHC 

RET 



E 

HZ 
B 

U 

c 

HI 

C,80 
Itti) 
MZ 



;IE16ER IK 
;nSB 

;UNTEHJtUF? 

jJA, HY ' -Hi, SI6H-FLA6 IHVERTIEIieH 



)CDEB (Y * S) MCH CDHL 

iA=0 

;yERSCHIEBUN8SIAEHLER>0 
;BSB Y = 0? 

tMEIN 

|Y m EIH BYTE LINKS SCHIEBEHt D HACH C 

IH HACH D 

^ HACH H 

;L ■ 

; VERSED lEBUHBSZAEHLER - 8 

;32 LINKSVERSHIEHJNGEH (B.H. ZAHL ■ 0)? 
(HEIN 



RHULL (AF-00441 
REELLE ZAHL ' 
I:/ 



lA = 

)EXP I = ID.H. I "0 ) 



MMHM.ISIER1M 2 



i^RSCHIEBWeSIKHLER - 1 

iCDHL EIH BIT LMS SCHIEBEHl HL t 2 

jDI2 



;C t 2 

;HU V7 6ESETZT? 
;HEIN HEITER 

iVERSCHIEBMBZAEHUR HACM A 
;CDHL HIEDER HACH CDEB 

iKEIHE VERSCHIEBIM? 

iJA 

;£!IP I-ABRESSE HACH 0. 

iVERSCMIEBUNeEH * EXP I 

lALS EXP U UHTERLAlff? 

;JA, I'd, RET 

IVERSCHIEBUMBEN = EIP X? ~> JA, Z>0, RET 

;LSB Y LADEH 

tZEIGER AUF EXP I 

;LSB Y7 » 0? 



(HEIH, Y RIMKH 
lEIP X HACN EXP Y 



;ZEI6ER AUF -SIBH Z 

iLAffiN 

)S16H HERAUSBLEWKN 

;HIT NSB Y VERKMEPFEN (DADUfiCH IHVERT.) 

)UNB HACH HSB T 

|Y HACH X ALS ER8 (Z) 



jLM Y ♦ 1, -0? 

INEIH 

[LSB T ♦ 1, » 0? 

;HEIH 

|HSi Y + 1, =:0? 

)HEIH 

|JA. HSB ■ 80 

lUf X t 1, ■ 07 

IHEIH 



eV-£RROR 
LD E.OA 

JP 19A2 



iOV-ERMR-CODE HACH E 
|ZUR ERRQR-ROUTIHE 



SEITE 23 



0717 71 


LD 


07H S3 


AW 


07n 5F 


LD 


07M2I 


INC 


07M7E 


LD 


07KU 


AK 


07M57 


LD 


07K23 


IK 


WIF 7E 


LD 


07C0 m 


ADC 


07C1 4F 


LD 


07C2C9 


RET 




BY ' 


0703 2i 2S 41 


LD 


07C*7E 


LD 


07C7 2F 


CPL 


07CI 77 


LD 


07C9 W 


lOR 


07U tf 


LD 


07CI 90 


SUB 


07CC47 


LD 


07CI 70 


LD 


07CE 91 


SBC 


07CF 5F 


LI 


07K7D 


LS 


0711 9lt 


5K 


0712 57 


LD 


97DI7& 


LD 


07B4 99 


SIC 


079S 4F 


LD 


07UC9 


RET 



UP SNMDY IAF,C,M,HL*2) 
SIHBLEHANTISSEMDBITIDH 
IiNI>SUmAW 
HL>ZEI6£R m LSB X 
flY=SIMMND 
OiNV'SlMIE 

A,(ai ;LSI I NACH A 

E {LSI Y AfiDIEREN 

E,A jERS HACH LSI Y 

m. }ZE16ER INC. 

A,(HL> |DER6L. 

D 

I, A 

HL 

A,IHL) ;DER8L. HIT RSI 

C 

C,A 



-HY 

)1L,4135 {SIBH-FLAS IHVERTIEREN 
A.IH) 

(HL},A 

A ;A = 

L,A )L « 

B )LS8 Y ' - LSI Y 

l.fl 

A,L ;DER6L. 

E,A 

A,L ]DER6L. 

D 

D,A 

A,L ilERH.. KIT RU 

C 

C,A 





UP SRYR (ft>0,F,IC,L=OI 

SCHIEBT SIMLEIAHL LM A BITS RECHTS 




IiY-ZAM. 






A=AHZAHL DER VERSC«IEMW6EH 




OiY>ZAHL 






BsZUSAETZLlCKS HIEKRHERT16STES BYTE 


07D7 0i 00 


LD 


B.OO 
OS 


;LSB >= 


07D9 U08 


SUI 


iNDCH 8 ODER HEHR VERSCHIEBUNSEK? 


07DI 38 07 


JR 


C,07E4 


INEIN 


07DB 43 


LD 


BE 


;Y Un EIII BYTE HACH RECHTS SCHIEBEK; E NACH 


07DE 5A 


LD 


ED 


;D HACH i 


07&F SI 


LD 


l,C 


;C HA»t D 


07E0 OE 00 


LD 


C.OO 
07D9 


;LSB Y =0 


07E2 18 FS 


JR 


;NEnER 


07E4 U 09 


ADD 


09 


iVERSCHIEBUWEK M NACH L 


OTEi tf 


LD 


L,A 




07E7 AF 


IDR 


A 


; CARRY LOESCHEH 


07EB2> 


DEC 


L 


jVERSCHIEHMB - 1, FERTIS? 


07E9 C8 


RET 


Z 


|JA 


07EH 79 


LB 


A,C 


)H5I Y / 2 


07EI IF 


fflA 






fl7EC 4F 


LD 


C,A 




D7ES 7A 


LI 


fl.D 


iDERSL. 


07EE IF 


RRA 






07EF 57 


Ll 


D,A 




fl7F0 7l 


LD 


A,E 


{DERSL. 


07F1 IF 


RRA 






07F2 5F 


LD 


E,A 




07F3 78 


LD 


A.B 


iKRSL. HIT LSB 


07F4 IF 


RRA 






07F5 47 


LD 


B.A 




OTFi 18 EF 


JR 


07E7 


IWITER 



KONSTAHTE 

07FB 00 00 00 81 ]> 1 

KONSTAHTEH FUER LH 

07FC 03 i3 STUECK 

07FD AA 56 19 80 )■ 0.598979 » CA. 2 t SflR (2) / 5 

OeOl Fl 22 74 80 |« 0,961471 » CA. 2 t SflR (2) / 3 

SEITE 24 



«M 43 M H B2 )- 2.B8S39 ■ U. 3 t SOD (2) / 1 



UP LOG (IIF,K,K,M.l 
t1 LOS-fWKTIli 



KKMCT MTUESLItHEIi LHMITMIS 

IiIHyMKin 

OiWUKTIIMSIEST 

eWf CI U 09 Ull 0YS3 ilMUHENT <■ •? 
40QC 17 OR It 

MM E« M IE » PC.IEM )JIL FC-EMW 

e81< 21 34 41 LI HL,4134 lEVKMTEtl KB MBUEVTES UTKIOi Elf I-ZEIOI 

N13 7E L6 A.1HL) (EIP I MCH « 

0ei4 01 33 U LI K,H3S |Y • 0.707107 (>8« (3) / 31 

Oil? 11 F3 04 LB H,04n 

Mil n SU I |EU> 1 - OFFSET HCH It 

0111 F3 PtiSM tf (UB RETTEl 

061C 70 LB (NL),B lEjP I - 

011163 Ptm BE iflETTBI 

OaU C3 PUSH K 



I - tHS - SO) (3) / 2) / ( MS * SON 131 / 31 

OtlF d li 07 CMl 07U tl ■ I > 0.707107 

0623 CI rap IC iMMTMITE ZURUEa 

0133 01 POP DE 

0824 04 INC I (EIP V t 1 (Y > S« (3)) 

OtZS n U U CMl 0fllt2 iBOR (3W I MCM I 

0621 31 FB 07 LB HL.07F8 | lEIBER «UF KOMTMTE 1 

OKI CB II 07 QtU 0710 |1 - 1 RKN I 

REIHE mECWEH 

•e2E 31 FC 07 LB HL.OTFC |ZEI6ER UF lEIHEKOEFFIZIEKTEl 

0931 CB « 14 aa H U iREIHI KKCMCIt 

KORBEXTW KS EMUMIS MCM EI6 - I REIK - O.S * EIP MK ) I LOS (3) 

0634 01 80 BO J BC,B060 |f > - 0.3 

0837 11 00 00 LB BE.OOOO 

0«3« a U 07 CitLi 07U il - I - 0.3 

0631 Fl POP AF }EIP K ZUMECX 

063E CB 19 OF CMl 0FI9 |I ■ 1 * It 

UP BMLTLS Itf.BC.DE.HLI 

SIWLEIULTlPlIbtTlON HIT LOI (3) 

Iil'lUHL 

OtI-ZNt 

0641 01 31 H LD K,B031 (T - LOi (3) 

«M 11 IB 72 LI BE,721B 

OP IMLTV (AF.BC.K.HL) 

SlMLEMLTIPLIUTIOHi Z ■ Zl I Z2 

liMMCTQI 

r-FAIT« 

Oil>PWBUrT 

0647 CB 33 09 CMl 0933 |ZI - ft? 

0e4« C8 RET Z iJA, Z>I1 

N4B 2E 00 LB L.OO |FlJlS FVER EIPOKXTEWEXMtKITIM FUER SfILT 

0B4I CI 14 09 CALL 04l4 (EIPtKHTa UM VORZEIOU VEUUEITEN 

0630 79 LB A.C |NZ2 UN Yl MCM (4IAF).. 

0631 33 4F 41 LD (4t4F),A iMBB 
0634 El El DE.HL (LSI 
0833 22 30 41 LB (4!30).ll. 

085B 01 00 00 LB BC.OOM |V - DHEMIBIEBIITElt (Z) LDESCMEM 

0631 SO LI B,l 

OeSC 36 LB E,B 

0631 21 U 07 LB HL,07U |90UIFE FUEI) 3 IVTE KS NWTISSE DURCH BUEUSPSUHBAfiUSSEJI DEF. 

06U E3 PUSH M. |Ma 3.ML ZH MBRMLISIEMW 

lUl 31 M 06 LI IH.,06A9 |3. HM. MNIM. UIEIERHXEH 

«6M E3 PUSH HL 

OeMES PUW Hi 

0641 31 71 41 LD ML,4131 |ZEIBER AUF LSI II 

«6H ?E U AjIm.) iIYTELMEN 

B6U 23 IK hL iZEIKR MIF NKOSTES BTU 

0661 B7 BR A {lYTE > ? 

•6iC 21 24 n Z,0693 |JA, EMEINII M 1 BYTE RECHTB 

a6iE E3 PU6H HL fZEllER RETTEl 

l6iF 2E 06 LI L.Oi ilITINfiLER - B 

0671 IF BRA iMEOCTES BIT IN CARRY, 6ESCTZT7 



1672 i? LB H,A | BYTE MCM N 

0673 79 L£ A.C (MR ESS UtK« FUER 9CNIEIEOPEBATI0H 

«e74 30 01 n Nt,0e61 tXIH, BOFBRT SCHIEIEII 



BEITE 23 



0874 £5 PUSH HL ;BYTE ftETTEK 

0677 2A 50 41 LB HL,(41S0) |H22 MJF EMEWI5 ADDIEREN (LSB) 

0S7A 19 ADD HL DE 

087B EB EK DE.HL 

087C El POP HI jlYTE ZUftUECK 

QS7D 3A 4f 41 LD A,(414Ft (RSB 

0B80 B9 AK C 

OSBl IF RM ;EfiG UN 1 BIT RECHTS SHIEBENi HSB / 2 

mi 4F LS C,A 

0863 7A LI A,D ;DER6L. 

0SS4 IF RRA 

4SeS 57 LI I.A 

OBU 71 L& A,E ;KR6L. 

08BT IF RRft 

0BS8SF LD E,A 

W8f 7S LD A,B ;BEfiGL. 

MSA tF RM 

0681 47 LD B,A 

0&8C 3S DEC L ;BITZKHLER lEC, FERTie? 

0681 7C LD A.H )BYTE MACH A 

D88E 20 El JR HI, 0871 ;HEIIt 

0690 £1 POP HL ;JA, ZEISER ZURUECK, KITER 

0891 C9 RET 

0692 43 LD B,E ;£R6 EIH BYTE HACH RECHTS SCHIEBENi £ HAQ B 

0893 5A LB E.O ;B MCH E 

0694 51 L6 D,C ;C HACH B 

0893 4F LB C,A ;C > 

0694 C9 HET 



UP 


SDIVIO lAF.IC.DE.HL) 




SIWLEDIVISOH BUKH 


lOD 




I:I>ZAHL 






Dill=ZAHL 




0897 CD A4 09 


CALL CI9A4 


iZAHL RETTEH 


089A 21 D8 OD 


LB HL.ODDS 
CALL 0981 


;ZEISER AUF KOHSTAHTE 10 


089D CS 81 09 


:HACH X LABEN 


WUCl 


POP »C 


;IWL ZURUECX HACH Y 


08A1 Dl 


POP BE 





UP S6IVY lAF.BC.DE.HL) 

SIN6LEDIVIS1QN: Z > Z2 / Zl 

IiI'DIVISDR 
Y^DIVIBENT 

0:I>WDTIEin 

OBAZ CD 55 09 CALL 09S5 tfilVISOR = Vt 

mi CA 9A 19 JP Z,199A ;JA, /0-ERROR 

DBAB 2E FF LB L.FF ;FLAe FUCR EIPfMlTTeRVERAnEITUHfi FUER SIIV 

OSAA CD 14 09 CALL 0914 jElPONEMTEN UW VORZEICHEN VERARBEITEN 

OSAB 34 INC (HL) ;£Re EJfP-KOAilEKTUR: EIP ERB + 2 

08AE 34 INC (HL) ;(09H'ERBLBT EIP Y - EKP !( - 1) 

08AF 2B DEC HL ;ZEie£fi AIF HSB Zl 

O8B0 7£ LD A,(HL) ;Zl » SUBTftAKTlQHSl^ t40BOI ABSPEIUCRH 

OSBl 32 39 40 LD (4089), A ;nSB 

0884 2B DEC HL 

0flB5 7£ LD A,(HL) 

08B4 32 65 40 LD (40B5),A 

0689 2B DEC HL 

OeBA 7E LD A, (HL) 

f>m 32 81 40 LD (4oei),A jLSfi 

OflK 41 LD B.C ;12 HACH BHL 

08BF EB EK DE,HL 

08C0 AF IQR A ;ERGR£GISTER Y ■ 

08C1 4F LB C,A jHSB 

08CZ 57 LD D,A 

08C3 SF LB E,A ;LSB 

06C4 32 8C 40 LD I40BC),A ;HSe Zt ■ (FUER SCHIEBEHl 

(MC7 £5 PUSH HL |Z2 RETTEH 

owe CS PUSH BC 

OeC9 7D LD A,L jLSfi Z2 LADEH 

08CA CI 80 40 CALL 4080 ;Z2 - Zl HACH Z2 

OSCI DE 00 SBC 00 jHSfi Z2 - UEBE8TRAS, UNTERLAUF? 

08CF 3F CCF |Cr KIMPL£HENTI»£H 

OBBO 30 07 JR HC,08B9 iJA, SUBTRAKTKM RUECK6AEH6IG, IH ERG EIHSCHIEBEH 

0SD2 32 &C 40 LB (408C),A ;HSB Z2 AB^ICHERH 

OeBS Fl POP AF ;Z2 VW STftCK EHTFEMCH 

0BD4 Fl POP AF 

08B7 37 SCF ;! IN Efl6 EIHSCHIEBEH 

0SD8 D2 CI El JP ttC.ElCl |HIRI HIE AUS6EFUEHRT 

(0eD9 CI POP ec ;Z2 AUS STACK ZORUECK, SiffiTRAKTIOH RUECK6AEN6IB> 

SEITE 24 



mm El 

OWI T) 

one 3c 

OCDB 311 

OWE IF 
ttDF FA 97 07 
0X2 17 
08E3 71 
«E4 17 
O0E5SF 
«6 7A 
0K7 17 
OSES 37 
0BE9 79 
08EA 17 
OBEB 4F 
08EC 29 
08EC 76 
OBEE 17 
OSEF 47 
OSFO 3A 8C 40 
08F3 17 
0eF4 32 8C 40 
08F7 79 
OfiFB S2 
0eF9 B3 
OfiFA 20 1:1 
OSFC E5 
«FI 21 24 41 
0W33 
mi El 
0902 29 C3 
0904 C3 B2 07 



0907 3E FF 
0909 2E flF 



(090A tf 
09CI 21 2D 41 
090E 4E 
090F 23 

0910 AE 

0911 47 
»912 3C SO 



0914 78 

0915 B7 

0916 28 IF 
0918 7S 
«19 21 24 41 
091C AE 

091 D BO 
091 E 47 
091F If 

0920 AS 

0921 7B 

M22 F2 36 09 
0925 C6 80 
0927 77 
0921 CA 90 08 
092B CD DF 09 
092E 77 
092F 2B 
0930 C9 



0931 CD 59 09 
0934 2F 
0955 El 

0936 B7 

0937 El 

0938 F2 78 07 
093B C3 82 07 



POP 

LB 

IRC 

KC 

HtA 

JP 

RLA 

LD 

RLA 

LD 

LB 

RLA 

LB 

LB 

RLA 

LB 

ADD 

LD 

RLA 

LD 

LB 

RLA 

LD 

LB 

QR 

OR 

JR 

PUSH 

LB 

HC 

POP 

JR 

JP 



HL 

A 

H,0797 

fl,E 

E,A 
A,D 

B,A 
A,C 

H^.HL 
A.l 

B.A 
A,(408C) 

(4080, A 

'/ 

E 

NZ,08C7 

HL 

HL,4124 

HL 

NI.08C7 
0712 



gttSB ER6 MMH A 
jBlT 7 ■ 1 IFERTIfil? 

jLETZTES BIT FUEl) RIMDUN6 IN A7 BEREITSTELLEN 
IM, MKML1SIER1M6 

jERS t 2 MACH ERBiEIHZUSCHlEBENBES BIT IH CY 
;LSB t 2 



|DER6L. 



|R» t J 



tZ2 I 2 (LSB) 



)(HSBI 

;ER8 HOCH 0? 

iKIH 

(JA, EXP EM - It LSB 22 RETTED 

iZElSER WF EXP X 

lEXP » - 1 . = 0? 

)LSB Z2 ZUftUEU 

IMEIH, tCITER 

;JA, OV-ERROR 



VQRBEREITUN6 DER EIPtMEHTEN UHD VORZEICHEH FUER HULTin.IKATIOH^ BIVISIM 



AHSPRUNB DBIV 
LB A,FF 
LD L,AF 



tFLA8 A ■ FF 



AHSPRUNS DHLT 



IQR 

LB 

LB 

IK 

lOR 

LD 

LD 



A 

HL,412B 

C,()l] 

HL 

IHL) 

B.A 

1,00 



;FLA6 A « 01 

iltSB f-ABRESSE NAN HL 

;SI6H Y HACH C 

{HL AUF EIP Y 

(HIT FLAfi ^ERnUI^EH D.H. KI DHLT B4IP Y 

)UW) B£I BDIV i ' -EXP Y - 1 

;FLM L LQCSCHEN 



ANSPRUH6 FUER SHLT (L>0) MB SDIU (L>FF) 



LD 

OR 

JR 

LD 

LD 

XH 

ADD 

LD 

flRA 

XM 

LB 

JP 

ABB 

LB 

JP 

CALL 

LD 

DEC 

RET 



Z,0937 
A,L 

HL,4124 

ihLi 

B 
B,A 

B 

A,B 
P,0936 

IHD.A 
1,08^0 
09DF 

IHL), A 
HL 



;EIP Y LADEM 

j= 0? (D.H. Y = 0) 

|JA, SQFHT IN HP ZIMIECK HIT IH X 

|FLA6 LADEN IBEI HLT, UIV liW SHLT = 0) 

;ZEIEER AUF EXP X 

;EXP T HIT FLAE VERKWCPFEN, B.H. KI SBIV = - EXP Y - 1 

;EXP I ABDIEREH 

;SimnE HACH EXP X 

;UEBER-/ UNTERLAUF7 

lieUEH EIP I LABEIt 
JA 

; OFFSET ABBIEREH 
lUttB MEUEM EXP I AP5PEICHERH 

)= 0?, RUECKSPRUHGADitESSE IIE8 ItKB SOFQRT ZURUECK ZIW » 
iVffitZElCHEH VERARKITEH 
tSI6N-FLA6 IN (4125) ASPEICtffitH 
;HL AUF EXP X 



lEKR-/ UNTEIH.AUF BEI EXP 



CALL 0955 {AM / LD6 12) TESTEN 

CPL )ERe KOMPLEHENTIEREN (D.H. ARG / LH2 < 0, X=0, SMST DV-ERROR) 

POP HL iRdCKSPRUHBABRESSE ZURUECK (BIRQ(T IH AUSDRUCKSANALYSE IURUECK) 

OR A lUNTERLAUF? 

Pff> HL iRUECKSPRUNGABRESSE ENTFERHEH, DARIT SOFQRT IN HP 

JP P.0778 ;JA, X = 0, RET 

JP mi gOV-EMOR 



SEITE 27 



UP 



SMLTIO lAFjBC.DE.HL) 
SlffiLEmTlPlIKATIDN HIT 14D 

]ii=im. 

0!K=ZAHL 



093E CD BF 09 CALL 09BF ;2M. IMCH Y 

OMl 78 LD ft,8 lEJP Iftttt. = in iim. = 0) 

M42 B7 OR fl 

0943 CB RET Z (Jfl, FERTIG 

0944 U 02 ADD 02 jKElB, EIP Y = EIP Y + 2 (ZAHL I 4), UEBERLAUF? 
mb DA B2 07 JP C,07B2 jJA, flV-ERRQR 

0949 47 LD B.A 

094A CD 16 07 CALL 0714 ;I ADDIEREM, D.H, 1 = 51 ZAHL 

0945 21 24 41 LD HL,4124 ;ZEI6ER AUF EIP I 

W50 34 INC (HL) jElP K + 2 ID.H. I = lOD t ZAHll, UEBEBLftUF'? 

OTOl C& RET J« ;NE1II 

0952 C3 B2 07 JP 07B2 ,JA, OV-EBRQR 

UP RTESTll lAFl 

TESTET ftEELLE ZftHL 

IiX>ZAm. (SINGLE DDER DOUBLE) 



D:KW( t < 0, ft=FF,CY=l,S-l 
KNN K =0, fl=00,Z=l,P=l 



HENH I > 0, AiOl 

0W3 3ft 24 41 LD ft, (4124) (EXP I IAD£H 

0958 B7 OR A ;= 0? (D.H. 1=0) 

0959 C6 RET 1 iJA 

09SA 3A 23 41 LS ft. (41231 jHSB I HftCH A 

mi FE ff W 2f 

(095E 2F CPL jAKKU COHPLEHEHTIEREN) 

VtSF 17 RLA ;SI6H X NACH CY 

09iO 9F SIC A iA « - CY, I > 0? 

0961 CO RET HZ ;HeiH 

0962 3C IHC ft jJA, A=l 

0963 C9 RET 





UP 


FLOftTA (AF,BC,DE,HLt 

8-Bn-ZAHL m SIM (BIT7) IN SIH6LE UHWNHLN 






liAi^ZAHL 








D:X>6LEICHE ZAK 




0964 06 ea 




LD 


B.BS 

DE.mo 


[EXP Y ' S 


0964 U 00 00 




LD 


■,LS8 Y = & 


0969 21 24 41 




LD 


HL,4124 
(HD.B 


;ZE16ER AUF EIP I 


096C 4F 




LD 


jHSfi Y = A 


09iD 70 




LD 


;EXP I « EXP Y 


09iE 06 00 




LD 


r 


jEXP Y = 


0970 23 




IW 


fZEIGER ftUF SIBN-fLAB 


0971 36 W 




LD 


(HL),80 


;='+' 


0973 17 




RLA 




fBIT 7 VON BESETZI? --> VDR NOWALISIERUNfi KOftPLEHENTIEREH 


0974 C3 62 07 


UP 
M 


JP 


0762 


;NDRHALI5IERUNS 




ABB 

AK-I 


(AF.BC.DE.HLl 
'UIKflON 








ABSOLUT UERT ElKER ZAHL BILKN 






hX=ARSUtCKTL 








ojk=fun*:tionsnert 




0977 CD 94 09 




CALL 


0994 


iX >= 0? 


097A FO 


UP 


RET 


P 


;JA, FERTIG 




NEB 


(ftF,K,D£,HL) 








NE6ATIVEN tfRT'EIHER ZAHL BILDEN 






I:X=ZAHL 








OiX=ZAHL 




0971 E7 




RST 


20 


jTYPX PRUEFEN 


097E; FA SB OC 




JP 


H,0C5fi 


jINTEBER? "> SPRUM6 


097F CA F6 M 




JP 


Z,0AF6 


;STR1H67 --> TH-EIHDR 



UP RNEB (AF,HLM123I 

HE6ATIVEN NERT EINER ffiELLEH ZML BILDEN 

hX^^ZAHL 

OiX=ZAHL 



0982 21 23 41 


LD 


HL,4123 
A.lHL) 


;ZEI6ER AUF HSI I 


5W5 7E 


LD 


;NACR A LADEN 


0984 EE BO 


IDR 


BO 


;SI6N-IIT INVERTIEREN 


0988 77 


LD 


(HL),A 


IHIEDER ASSPEICHERN 


0989 C9 


RET 







UP SEN (AF.HL) 
11 S6N-FUMKTI0N 

IILDET DIE S6N-F(JNKTI0H EINER ZAHL 

SEITE 28 



Ii](=UHICNT 
OiI'FUfKTIWSWRT 
09M CI « M CfllL 0994 [J TESTEH 

UP INTA (AF HL) 

NftHMLT fl'lH 16-BIT-lNTEGER W (HIT SI6N} 

IiA=ZAIfi. HIT VWZEICICH (BIT 7) 

0:HL, X'l&'lIT-INTEEERZAHL HIT UOitZElCHEN 

0980 6F LS L,A jZAHL HACH LSI HL 

IW8E 17 RLA iIAHL < 0? 

098F 9F SK A {JA, FF MCH A 

0990 67 LI H.fl ;UND IISB HL 

0991 C3 9A OA JP 0A9A ;HL NACH I 

UP TESTI (AF.HL) 

TE5TET ALLE NUHERISCHEN TYPEN 

liUZAHL 

DiSIEHE RTESn 
0994 E7 RST 20 jTYP PRUEFEH 

«H M Fi OA JP 7,0W6 jSTRIK? --> TH-ERROR 

0998 F2 55 09 JP P,0955 fSIMLE QDER DOUBLE? -> RTESTX 

OP ITESTI (AF.HLl 

TESTET IHTEBERZAHL 

liWAHL 

0:HL,1(>IAHL 
m SIEHE RTE3TI 
W|2A2141 LI HL,f4121) jIAHL LAMH PMCH HL 

099£ 7C LD A,h = ? 

099F 15 OR L 

09A0 EB RET Z jjfl, FERTIS 

09A1 7e LI ft.H iNEIn, NSI HACH A 

09A2 18 &e JR 095F {UND tlACH RTESTI 

UP SPU5HI (DE) 

RETTET SIN6LE AUF STACK 

I:](=ZAHL 

D:(SP),(Sptl)iE)P UNDnSB 
(SPt!l,(SPt3)!LSfl 

IE,HL :HL MACH SE 

HL,(412t) ;LSB I HACH HL 

fSP),HL iHlT RET-ADRESK VERTAOSCHEN 

ftt. (RUECKSPRIMADRESSE PUSHEN 

HI, (41231 ;IBB*E)IP HACH HL 

ISPI,KL [HIT RUECKSPRUWADRESSE VERTAUSCHEH 

HL ;RUECK9>lllRffiAIRESSE PUSHEH 

K,HL |K HACH HL ZlffiUECK 



09A4 El 


EI 


09AS 2A 21 41 


LB 


me EI 


EI 


Of Af E5 


PUSH 


99U 2A 23 41 


LD 


09AD a 


EI 


09AE ES 


PUSH 


09AF EB 


EI 


09B0C9 


RET 



UP SLDKYC (BC,DE,HLt41 
LAEDT SIN6L^KdHSTAHTE 
I:HL=ZEIGER AUF KOHSTAHTE 
0:I,Y=ZAHL 
09B1 ED C2 09 CAU. _09C2 ;KOHSTAHTE HACH Y LADEH 

UP SLDIY (DE) 

TRANSPORT lERT SIH6LE lAVL 

IiY=ZAHL 

BiI=ZAHL 
W" U n , " "E**- fLSi T HACH H, HL HACH DE RETTEH 
0965 22 2141 LD (4121), HL ;ALS LSB K flflSHlCHERH 
0918 £0 LD H,B jHSB UHD EIP Y HACH HL 
09B9 69 LD L C 

WBA 22 23 41 LD (41231, HL ;ALS HSB UW EIP I ABSPEICHERH 
09BD EB EI M,HL [HL ZURUEEK 
09BE C9 RET 



UP 



SLDYI (BC,K,HL=4125) 
TRAKSPDRTIERT SIH6LE ZAHL 
IiIiZAHL 
0:YgZAHL 
09lf 21 21 41 LD__ HL,4121 jZEISER AUF LSfi I 

UP SLDYC (BC,DE,HL+4) 

LAEDT KOHSTAHTE 

I:HL<ZEISER AUF KOHSTAHTE 

D:Y=KDNSTAMTE 

«C2 5E LD E.IHLI )LS6 LADEH 

<WC3 2S IHC HI -ZEISER IHC. 

SEITE 29 



0?C4 54 


LD 


D, (HL) 


;DEReL, 


09C5 2J 


IKC 


hi! 




09C6 4E 


LD 


C, (HLt 


;DER6L. 


dKl 23 


INC 


HL 




09C8 46 


LD 


B,(HL) 


;DER6L. 


(J9C9 23 


IHC 


HL 




WH C9 


RET 






UP 


SLDCK (Af.B«0,K=4125,HL*4l 
SPEICHEflT im ALS KOttSTANTE 




l'.l=im 






0:(HL) 


.(HL+3)=iftHL 




D9CB 11 21 41 


LD 


K,4121 

B,64 

09D7 


;I-ADRESSE NACH SE 


(flCEM 04 


LS 


:Sim.E-lM.-LfiE)tK HKH t 


09D0 IS 05 


JR 


;KITER 



UP 



09D2 El 



091)3 3A AF 40 
SflU 47 

09D7 lA 
09D8 77 
09D9 13 
09M 23 
09DB 05 
09DE 20 ft 
mi Zt 



am 21 23 41 

09E2 7E 
09E3 07 
09E4 37 
09E5 IF 
09E4 77 
09E7 3F 
09ES IF 
09E9 23 
09£fl 23 
09EI 77 
09EC 79 
09ED 07 
09EE 37 
09EF IF 
09f0 4F 
Offl IF 
09F2 AE 
09F3C9 



09f4 21 27 41 
09F7 11 D2 09 
09FA le 06 



09FC 21 27 41 
09FF 11 D3 09 
OflOZ Q5 



BOVE (AF,B=0,[)E+4,HLMI 
TRAHSPORTIERT BERT JEHN TYP 



I:HL=BtELLZEI&ER 
DE=ZIELZE16Eit 

(40AF)iTYPI=LANEeE HS ZU UEIERTRA6EHDEN BEREICKES 

IM.t..=HERT 
0:(K)..=IIERT 
EI DE.HL jZIEL- UKD OUELLZEIKfi VERT, 



UP raVEl (Af,B=00,Kt4,Hm) 

HIE tIDVE 6EI VE^TAUSCHTEN ZEI6EIW 
LD A,(40AF) ;T¥PI1 LAKH 
e,A (ALS lAEHLER 
A,(K) ;B¥TE LADEK 
(HL),ft ;ABSPEICHERN 
DE iZEIBER INC. 
HL 



LD 
LD 

LD 

m 

INC 
DEC 
JR 
RET 



HZ, 0907 



;ZAEfH.ER DEC, FERTIG? 
;NE1N, HEITER 



VERAfiSEHUNG MR VORZEICHEM BEl REELLEN ZAHLEN 



LD 

LO 

RLCA 

SCF 

RRA 

LD 

CCF 

RRA 

INC 

INC 

LD 

LD 

RLCA 

SCF 

RRA 

LD 

RRA 

lOR 

RET 



HL,4123 
fl,(HL) 



(HL),A 



HL 
HL 

(HD.ft 
A,C 



C,A 
(HL) 



ZEIGER AUF fISB i 

NSB I NACH A 

S16K NACH AO 

cy » 1 

SIGN IN CARRY, NSB 17 = 1 

NACH RGB i 

SIGN K KOHKEHEHTIEREN 

UNO NACH A7 

ZEI6ER AUF Si6H-FLG (41251 

- SIGN i DORTHIN 

.nSB r KACU A 

SIGN V NACH AO 

CY = 1 

NSB r7=l, SIGN 1 IN CT 

NSB Y ABSPEICHERN 

SIGN NACH A7 

HIT - SIGN H VERKNIRPFEN --> A7 



1, tCKN SIGN I = SIGN y 



UP LDIY (Af,fl=0,D£,HL) 
SPEltHERT «RT m 
Iiy=NERT 

(40AF)=TYP DES KfiTES 
OiI=N£KT 

ID HL,4t27 jY-ADRESSE NACH HL 

LD DE,09D2 ;ADRES5E VON HOVE 

JR OA02 ;I-ADRESSE ERfllTTELN (MD NACH HOVE 

UP LDYI (AF,B=0,DE,HL) 
SPEICHERT NEftT UN 
l!)(=NERT 

'l40AF)=TyP DES NEflTES 
OsY'NERT 

LD HL,4127 ;Y-ADRESSE DES HERTES 

LD DE,09D3 ;ADRESSE VON ttOVEl 

PUSH DE (I-hDRESSE ERHITTELN UHD HftCH MWEl 

UP POINTS (AF.DE) 

ERfllTTELT X-ADRESSE IN ABHAEMIKEIT VON TYP< 
i:(40AF)=TYP]( 



SEITE 30 





0:DE=K-AE)ftESSE 


mi 11 21 41 


LD I>E,4121 


mi E7 


RST 20 


0A07 DS 


RET C 


0M8 11 ID 41 


LD DE,411D 


OMI C9 


RET 



jI-ADRESSE EUER SIKfiLE, INTE6ER mi STKIU 

)TYP TESTEH, DDUfilE? 

■NEIN 

]I-ABftESS£ FUER DOUBLE 



UP SCPIY {Af,HL) 

SIII6LEVER61EICH: II UNS 12 

ItWl 
Y«Z2 

0:21 > Z2, fl-1 

U " 22, fl=0, Z=l 

Zl < Z2, ft"fF, C1=\, S=I 

OflOC 7B LD A,l [12 = 0? 

OAQD B7 OR A 

MOE CA 55 09 JP Z,0?55 jJA, Zl TESTEH IMD ZURUECX 

OAll 21 5E Of LD hL,095E }«ST-AD<tESSE AUF STACK 

0ftl4 E5 PUSH HL [lA? = 0, A»FF (CY.Pl, ft7 = 1, A=l) 

0A15 CD 55 09 CALL 0955 :Z1 = 07 

OAia 79 LD A,C |NSfi 22 NACH A 

M19 C8 RET 2 iJA, -SI6H Z2 ERGIBT ER6 

0A1A2123 41 LD tl,412S ;ZEI6ER AUF HSB 21 

OAID AE lOR IKL) ;SI6N Zl ' 5I&N Z2? 

OAIE 79 LD A,C jHSB 22 HACK A 

OAIF F8 RET H ;NEIH, -SIGN 22 ER6IBT ER6 

OA20 CD 26 OA CALL OA26 iVER&LElCH BEl 6LE1CKEN VDRZEICKEN: BEI BLEICWCIT Z, X>1 CI GES. 

Ofl23 IF RRA (CT MCH fl7 

0A24 A9 lOR C ;IEI KEATIVEN V0R2EICHEH A7 INVERIIEREN 
0A25 C9 RET 





VER6LEICH 




M2& 23 


INC 


HL 


)ZEI6ER AUF EIP I 


0A27 78 


LD 


A.B 
(HL) 


I EXP Y LADEN 


0A28 BE 


CP 


;N]T EIP It UER6L. 


0A29C0 


RET 


H2 


|RET. HENN UN6LEICH 
;ZEI6ER DEC 


0A2A 2B 


DEC 


HL 


062B 79 


LD 


(|5l) 


jDERSL, HIT nSB 


(3fl2C BE 


CP 




0A2D CO 


RET 


N2 




0A2E 2B 


DEC 


HL 




WI2F 7A 


LD 


A.D 
(HL) 


jDERBL. HIT LSfi 


OAJO BE 


CP 




0A3t CO 


RET 


N2 




0A32 2B 


DEC 


HL 




0A33 7B 


LD 


A,E 




0A34 96 


SUB 


(«.) 




OA35 CO 


RET 


HZ 




Ofl3i El 


POP 


HL 


;i = 1: RUECKSPRIM6ADRESSE EHFERMEH 


0A37 £1 


POP 


HL 


iSOFORT IH W HIT 2=1 


0A38 C9 


RET 






UP 


ICP 


(AF) 






INTEBERVERSLElCHi 


Zl UHD Z2 




hlU 


=HL 






Z2=DE 






Q:SIEHE SCPIY 




0A39 7A 


LD 


A,fi 


jVORZEICHEH 6LEICH? 


OAIA AC 


lOR 


H 




0A36 7C 


LD 


A.H 


iHSB Zl NACH A 


0A3C FA 5F 09 


JP 


n,095F 


;HEIH, VORZEICHEM VOK Zl ER61BT ER6. 
;tt5B 21 > nSB 227 


M3F BA 


CP 


D 


0A40 C2 60 09 


JP 


NZ,0960 


;NEIH, CT ERSIBT ERG 
iLSB 21 = LSB 22? 


0A43 7D 


LD 


A.l! 


0A44 93 


^B 


E 




0A45 C2 60 09 


JP 


NZ,0960 


;HE1N. CY ER61B1 ERB 
;JA, ZURUECK NIT A'O 


0A48 C9 


RET 





UP KPIC (AF.flC.DE.HLI 

D0UBLEVER6LEICH 21 UHD KONSTANTE 
IiZl=I 

H<ZE1SER AUF KONSTANTE 
OiSIEHE SCPKY 
0A49 21 27 41 LD HL,4127 jZEISER AUF Y 
0A4C CD D3 09 CALL 09D3 ; KONSTANTE HACN Y 

Iff KPIY (AF,BC,DE,HL) 

DOUBLEVERGLEICH! Zl UND Z2 
I:I=Z1 

SEITE 31 



OAtF II 2E 41 
M52 LA 
0A53 B7 
0A54 CA S5 09 
0AS7 2] 5E 09 
0A» E5 
OflSB CD 55 09 
0A5E IB 
0A5F lA 
OUO 4F 
OAit C8 
0A62 21 23 41 
OA&S K 
0A66 79 
0A67 FB 
0A68 13 
0A69 23 
OAiA Ob 08 
0A6C lA 
0A6D 9b 
OAU C2 23 OA 
DA71 IB 
OA72 2B 
0A73 OS 
0A74 20 H 
0A7& CI 
Wl77 C9 



1=12 
D:SIEHE SCPIV 



LS 
LS 

DR 

JP 

LD 

PUSH 

CALL 

DEC 

LD 

LD 

RET 

LD 

IK 

LD 

RET 

INC 

IK 

LD 

LD 

SUB 

JP 

BEC 

DEC 

DEC 

JR 

POP 

RET 



DE,412E 

A.tK) 

Z.MK 
W.,095E 

HL 

0955 

BE 

A,(l£) 

C,A 

M.,4123 

!•' 

BE 

HL 
B,OS 
A, (DEI 

fk.) 

KZ,0A23 

BE 

HL 

B 

NZ.OAU; 

K 



;ZEI6ER AUF EIP 12 
•,ll = 07 

;JA, n BESTIHHT ERS 

jTEST-ABRESSE AUF STACK 

f(A7 = 0, A«FF; A7=l, A«01) 

;X « 0? 

ilEIKfi ftUF HSB y 

;HSB Y NACH A UMD C 

fJA. -SISII Y BESTIIWT EflS 
;ZElSER m 5I6N I 
;SIBN Zl ■ SISN 72? 

iMElH, -SI6N Y BESTinnT ERG 

^ZEIBER AUF EIP Y 

]ZEI6ER AUF EIP I 

I 8 BYTES 

;1 BYTE VEmEICUEH 

lUNBLElCH, AUS CARRY ER6 9ERRECHNEH 
iZEICER DEC. 

;B BYTE VERGLICHEH? 
IHEIH, KITER 

iRUECKSPRtMGADRESSE ENT^RKH 
IZURI^CK NIT A=0, Z=l 



UP KPYI lflF,BC,D£,HL) 

BDUBLEVERfilEICH: Zl UND Z2 



0A7B CD 4F OA 
0A7B C2 5E 09 
0A7E C9 



IiY'Il 
I*Z2 
OiSlEHE SCPIY 
CALL 0A4F 
JP NZ,095E 
RET 



llKPIV MFRUFEM 

jZAHLEH UN6LEICH? -> ERB INVERTIEREN 

INEIH, IURt£CK 





UP 
It 


CIHT 
CIMT- 


(AF.BC,DE,HL) 
FUHKtlQH 








MNBELT ZAHL IN U-BIT INTE6ER DM 






I:I=ZAHL 








(l:I=ZAHL 




0A7F E7 




RST 


20 


iTYP TESTEN 


OABO 2A 21 4] 




LD 


Hl.,(4121) 


;I NACH HL (RICKTIG NW BEI INTEGER) 


OABSFfi 




RET 


H 


llHTEfiEfl? -->FEH18 


0Ae4 CA fb OA 




JP 


l.atfb 
HC,0AB9 


iSTRINS? "> TN-ERRM 


0A87 D4 B9 OA 




CALL 


;DDUBLE? -> IN SINGLE UMfANDELN 


OASA 21 B2 07 




LD 


HL,07B2 


lOV-ERfiOR-@BRESSE AUf STACK 


0A8B E5 




PUSH 


HL 




0A8E 3A 24 41 




LD 


A, (4124) 


;EXP I > 166? (ABS (ZAHL) > 32767B) 


0A91 FE 90 




CP 


90 




0fl93 30 OE 




JR 


HC.OAAJ 
OAFB 


jJA 


0A9S CB FB DA 




CALL 


ilNTII) NACH BE 


0A98EB 




EI 


D£,HL 


iHnLH HL 


0A99 01 


UP 


POP 


DE 


;OV-ERROR-ADRESSE AUS STACK ENTFERHEN 




ILDIHL (A) 








LAEDT ZAU AL5 INTEGER NACH X 






IiHL=ZAHL 








0!l«ZAHL 








TYPI«2 




0A9A 22 21 41 




LD 


(4121), HL 


;HL HACH I 



OP TYPII (A=02) 
TYPI « INTEGER 



0A9D 3E 02 
0A9F 32 AF 40 
0AA2 C9 
0AA3 01 80 90 
OAAi 11 00 00 
0AA9 CD OC OA 
OAAC CO 
OAAD 61 
OME U 
OAAF 18 E6 



I:/ 

0:TYP1 

LD 

LD 

RET 

LD 

LD 

CALL 

RET 

LD 

LD 

JR 



' Z 
A, 02 

(40AF),A 

BC,908D 

DE.OOOD 

OAOC 

NZ 

H,C 

L,D 



;TYPCOI£ FUER INTEGER NACH A 
;UND NACH TYPI 

IKONSTANTE -327680 HACH Y 

!l • - 32768B? 

jNEIN, OV-ERfiOR 
jJfl, HL = - 327i8D 

;HEITER NIE OBEN 

SEITE 32 





II 


CSN6X lAF.BC.DE.K.) 
CSHB-FUNKTION 








MNDEIT ZAHL IN SIHSLE m 






uuim. 








iiuim. 




MBl E7 




RST 


20 


ITYP TESTEN? 


0AB2E0 




RET 


PO 


iSIWLE? -> FERTIG 


Oft83 FA CC OA 




JP 


R.OACC 


;1HTEBER? -> SPRUN6 


atHb CA Fb OA 




JP 


Z,0AF6 


;STHII(6? --> TH-ERROfi 


QAB9 Zl BF 09 




tH.L 


il HAD) Y 


OABC CD EF OA 




CALL 


OAEF 


jTYPI = 4 


OABF 78 




LD 


A.fl 


;I ' 0? 


OACO B7 




OR 


A 




DACl C8 




RET 


1 


;JA, FERTIB 
;SieH ABTRENNEN 


0AC2 CO DF 09 




CALL 


09DF 


OACS 1\ 7i it\ 




LB 


HL,412d 

B.IHL) 

0)94 


tfiERA&E NICMT nm ISBERHDIfflEieS BYTE 


0AC8 U 




LD 


;ZUR RUHBUNB BEREITSTELLEN 


0AC9 C3 96 07 


UP 


JP 


ffiUNDUHG UND NDRHALI5IERUN6 




icsNen 


iaf.bc.de.hl: 


1 






IHTEBEIl IN SiHeiE'llHMKDELH 






I:»=IftHL 








Dil[=ZAHL 




OACC 2A 21 41 




LD 


HL, 14121) 


]INTE6ER NACN HL LADEN 




UP 


ICSWK 


iaf.bc.de.i&i 


f 






INTEEEf! IN SINBLE' URUANDELN 






uvL'imL 








D:WftHL 




OfiCF CD EF OA 




CALL 


OAEF 


iTYPI - 4 


0AS2 7C 




LD 


A.H 


iPARAHETER FUER FLDATA 


0AD3 55 




LD 


DL 


1 BEREITSTELLEN 


0AD4 IE 00 




LD 


E,00 




mi Ob 10 




LD 


B,90 
0969 


;EU> I ' 1^ 


OADS C3 69 09 


UP 

tl 


JP 


t SPRUNG IN FLDATA 




CDBLI (AF,BC,DE,NL) 
CBBL-FUMKTlDN 








lAtl IH DOUBLE UNHANDELH 






I:];=AReUffiNT 








0:l=FUNKTIDNStl£RT 




OADB E7 




fiST 


20 


jTYP TESTEH 


OAK DO 




RET 


NC 


iDfflJBLE? --> FERTI8 


OADD CA F6 OA 




JP 


Z,MF6 


1 STRING? "> TH-ERRDR 


OAEO FC CC OA 




CALL 


H.OACC 


; INTEGER? -> IN SINGLE UWANDELN 


0AE3 21 00 00 




LD 


HL.OOOO 


;DIE 4 NIEDERt£RTIBSTEN BYTES 


OAEi 22 ID 41 




LD 


I411D),HL 


;LKSCKEN 


0AE9 22 IF 41 




LD 


I411F},HL 





UP TYPID (A=08,H;=043&E) 

TYPX = DOUBLE 
1;; 

D:TYP» = a 



OAEC 3E 08 LD A.OS :A = TYPCODE DOUBLE 

OAEE 01 3£ 04 LD Bt,043E 



UP 

(OAEF 3E 04 
OAfl C3 9F Ofl 


TVPIS 

TTPI ■ 

1;/ 

0:TYPI 

LD 

JP 


1A=04) 
SINGLE 

= 4 

A, 04 
0A9F 


jA = TYPCODE SIH6LE) 
;IN TYP I ABSPEICNERN 


0AF4E7 
0AF5 C8 


TESTEN, 

RST 

RET 


, BB STRING IN 1 
20 ilYP TESTEH 
I iSTfilNS? -> FERTIfi 


0AF6 IE 18 
0^8 C3 A2 19 


IH-ERRM 
LD E.IB 
JP 19A2 


;TH-ERROIt-CBDE NACH E 
;ZUR ERROR-ROUTINE 



UP FUER INT, FIK, CINT 

OflfB 47 LD B.A ;NENN A-0, IU(tUECI( HIT T=0 

OAFC 4F LD C,A 

OAFD 57 LD D,A 

OAFE SF LD E,A 

QAFF B7 OR ft 

OBOO C8 RET 1 

SEITE 33 



OBOl E5 


PUSH 


HL 


0BO2 CD SF 09 


CALL 


09BF 


OB05 CD DF 09 


CALL 


09DF 


06OS AE 


lOfi 


tHL) 


0809 67 


LD 


H,A 


OBOA FC IF OB 


CALL 


I1,0B1F 


OBOD 3E 96 


LD 


A,9B 


OBW 90 


SUB 


fl 


OBIO CD D7 07 


CALL 


07D; 


0B13 7C 


LQ 


A,H 


0B14 17 


RLA 




0B15 DC AB 07 


CALL 


C,07A3 


OBIS Ob 00 


LD 


B.OO 


OBIA DC C3 07 


CALL 


C,07C3 


OBID El 


POP 


HL 


OBIE C9 


RET 




OBIF IB 


DEC 


DE 


0B2O 7A 


LD 


A,D 


0621 A3 


AMD 


E 


0B22 3C 


INC 


A 


0B23 CO 


RET 


NI 


0B24 OB 


DEC 


BC 


0B25 C9 


fiET 





iZEISER AUF £1? I RETTEH 

;I NACH I 

;5I&H ABTREWIEH 

;I IIEGATIV? 

jSIBN NACH H7 

;JA, LSB DEC. (DAHIT IMT(-U = -1 UKD NICHT -2) 

;HAMTISSEMLAEN6E - EXPONENT ERB. RECHTSVERSCKIEBUN6EN 

|flECHTSUERSCHIEBIW6EN 6USFUEHREN 
JHAR 1 NEGATIV? 

;JA, FESTKHHAZAH * 1 
iLSB = 
iJA, MX := - fli 
;ZEIBER AUF EI ZURUECK 

jLSB - 1 
i-0? 



;ltE]N, FERTIG 
iRSB - 1 



UP FII (AF,BC,DE,HL) 
II FIX-FUMKTIDN 

INT OHN£ BERUEiKSICHTlGUKG D£S VDRZEICHENS 

IiI=AfiGUHENT 



0626 E7 
0B27 F8 
0B2B C> 5S 09 
0B2B F2 37 OB 
OB^ CD 62 09 
0B31 CD 37 08 
0834 C3 78 09 



0B37 E7 
0638 F8 

0839 30 IE 
0B3B 28 B9 
063D CD SE OA 

0840 21 24 41 
0B43 7E 

0B44 FE 98 
0S46 !A 21 41 

0849 DO 
0B4A 7E 

0B4B CD FB OA 
0B4E 36 98 

0850 7B 
0B51 F5 
0B52 79 
0653 17 

0854 CD 62 07 
0657 Fl 
0B5B C9 



0659 21 24 41 
0B5C 7E 
0B5D FE 90 
085F DA 7F OA 
0662 20 14 
0864 4F 
0B65 2B 
0866 7E 
0667 EE 60 
0869 06 06 
0B6B 26 
0&6C 66 
066D 05 
0B6E 20 FB 
0B70 B7 



0!l(=FUfttTID«SHERT 



RST 

RET 

CALL 

JP 

CALL 

CAU 

JP 



20 

H 

0955 

P,0B37 

0962 

0B37 

097B 



jTYP TESTEH 

jiHTEGER? --> FEHUS 

;K >= 0? 

;JA, SPRtHG ZU IHT 

I«IN, K = - I 

;iNT 

tX = -I 



INT (AF,BC,DE,HL) 
IMT-FUNKTION 



ERniTTELTE HAECNST 

IiUARBUMENT 

0:MUKKT]ONSH£RT 

RST 20 
H 

HC,0B59 
Z,0AF6 
0A6E 
HL,4124 
A,(HL) 



RET 

JR 

JR 

CALL 

LD 

LD 

CP 

LD 

RET 

LD 

CALL 

LD 

LD 

PUSH 

LD 

RLA 

CALL 

POP 

RET 



A, 11121) 

NC 

A,(KLI 

OAFB 

IHL),9B 

fl,C 

0762 
AF 



KLEINERE 6ANZE ZAHL 



;TYP TESTEN 

: INTEGER? --> FERTIG 

; DOUBLE'' --> SPRUN6 

jSTRIHG? ~> TN-ERROR 

jMENN UNFOfmUNG IN INTEGER HOEGLICH, DIESE AUBFUEHREN UND FERTIG 

jZElGER AUF E)P I 

;EIP ) NACH A 

IEXP I >= MMTISSENLAEH6E? 

;LSB I LADEN 

;JA, FERTIG, KEINE NACHKOMMASTELLEN VORHANDEN 

jEIP I HACH A 

jHACHKOnHASTELLEN ENTFERNEN NACH V 

;NANT1SSENLA£NGE NACH EKP I 

{LSB 1 NACH A, RETTEH 



jSIGH Y IN CARRY 

{NQffilALISIERUNG UNO KM Y < 0, X'-l 
;LSB Y ZURUECK 



DOUBLE INT 



LD 

LD 

CP 

JP 

JR 

LD 

DEC 

LD 

XDR 

LD 

DEC 

OR 

DEC 

JR 

OR 



HL.4124 ;ZEIGER AUF II 

A.iHL) jEIP X < 16D? (X < 32768D) 
90 

C,0A7F jJA, CINT 

NZ,0B76 f£XP X > 160? -> SPRUNG 

C,A iEXP X KftCH C 

HL ;ZEIGER AUF NS6 I 

A, (HL) ;J = -327i6D?: 

80 ;-SIGN X NACH A7 

8,06 ;6 BYTES 

HL ;Zei6ER AUF NAECHSTES BYTE 

IHLl ;KNN <> 0, A OO 

B iBYTEZAEHLER DEC, FERTIG? 

NZ,0B6B ;N£IN, HEITEfi 

A iA=0? (D.H. X=-32768D ) 



SEITE 34 



0871 2i 00 80 LB HL.BOOO ;-3276fiD HACH HL 

0B74 CA 9A OA JP Z,M9A ;JA, FERTI8 

0877 79 LD A.C iEXP I ZUftUECK 

0B78 FE Be CP BB ;E](P I >■ nMTISSE)ILAEH6£7 

0B7A DO RET KC ;JA, FERTIB, KEIHE HftCHKDHMSTELLEH 

0B7B F5 PUSH AF ;l«lRnALISfERllN6SFLAS ICY) RETTEN 

0B7C CD 6F 09 CAU 09BF ;I HACH T 

0B7F CD DF 09 CALL 09DF {SI6(I ABTREHHEN 

imi AE ID» (HL) ;l NE6ATIV? 

0B83 2B DEC tC |IE1KR AUF EIP I 

0BB4 3i BB LD IHL),I8 ;EIP I ' HAHTISSEW.AEN6E 

am F5 PUSH AF ;Si6M (A7) RETTEN 

0B37 FC AO OB CALL n.OBAO ;JA, LSB - 1 IS. D.) 

0B8A 21 23 41 LD HL,4123 ;IEl6ER AUF HSB I 

0B8D 3E BB LD A,B8 ;)IAHTISSEHLAENGE - EIPQNEHT ER6. RECHTSVERSCHIEBUHGEN 

OBBF 90 SUB B 

0&90 CD &9 OD CALL 0Di9 ;RECHTSVERSCHIEBUHEEN AUSFUEHREH 

WZ Fl POP AF iSIW ZWUECK 

0B94 FC 20 OD CALL H,0D20 jS < 0? -> FESTKOHHAZAHL ♦ 1 

; (DAHIT AUCH BEI HEBATIVEH ZAHLEN KAECHST KLEMRE ZAHL) 

OB97 AF IDR A ]LSB FUER H0RNALISIERUH6 = 

OB?e 32 IC 41 LD I411C),A 

0B9B Fl POP AF ;FLA6 FUER KlRflALISlEflUHG ZURUECK 

0B9C DO RET HC iKEIK MRNALISIERUKS? -> FERTIB 

0B9D C3 DB OC JP OCDS ;SPRUN6 ZLtR NORflALISIERUM 

OBAO 21 ID 41 LD HL,4tlD {LSB - It ZE16ER AUF LSB H 

0BA3 7E LD A.IHL) ;B¥TE LADEN 

'1BA4 35 DEC (HL) ;- 1 

0BA3 B7 OR A ;VORHER > 07 

OBAi 23 INC M. jZEI&ER IK. 

0BA7 28 FA JR Z,0BA3 ;JA, HEITEN 

06A9 C9 RET 



UP 


INDEX (AF.DE) 

MULTIPLIKATION (FUER FELDVERHLTUW) 




I:BC=FAKTDR 






DE=FAKT(IR 






Q:BC=PRaDUi:T 




06AA E5 


PUSH HL 


;HL RETTEH 


O&AB 21 00 00 


LD HL.OOOO 
LD A.B 


;ER6 LOESCHEN 


OBAE 7B 


;f»;tor = 0? 


06AF Bl 


OR C 




OBBO 2B 12 
OBBZ 3E 10 


JR Z,0BC4 
LD A, 10 


;JA, ERS'O, FERTIB 
■Abl DURCJIAUEFE 


0BB4 29 


ADD HL.HL 
JP C,273D 
EI DE,HL 


|ERB t 2, UEIERLAUF? 
;JA, BS-£RflW 
;FAKTOfi DE t 2 


OBBS DA 3D 27 


0BB8 EB 


0BB9 29 


ADD HL.HL 




OBBA EB 


EX DE.HL 


;HAECHSTES BIT 6ESETZT? 


OBBB 30 04 


JR NC.OBCI 


:HEIN, NEITER 

;JA, AWEREN FAXTOR ADOIEREH, UEBERLAUF? 


0B8D 09 


ADD HL.BC 
JP C,273D 


0B6E DA 3D 27 


;JA, 6S-ERR0R 


OBCl 3D 


DEC A 


IFERTIS? 


0BC2 20 FO 


JR N2,0BB4 


;REIN. NEITER 
;ERG NACH DE 


0BC4 EB 


EI DE,HL 


0BC5 El 


POP HL 


;HL ZURUECK 


0BC4 C9 


RET 






IKTEBERARITHKETIK 





UP ISUB (AF.BC.DE.HL) 

INTEBERSUBTRMTlONi Z » ZI - Z2 
1:DE=HINUNEND 

HL=SUBTRAHENT 
0:HL,IiDIFFER£HZ 
(BEI UNTER-/UEBERLAIH= IN I ALS SINGLE) 



0BC7 7C 


LD 


A,H 


;SISN Z2 IN CY 


0BC8 17 


RLA 






0Be9 9F 


SBC 


A 


;B=FF, HENN 12 < 0, SOHST 


OBCA 47 


LD 


ofei 




(»CB CD 51 OC 


CALL 


:I2 = - Z2 


OBCE 79 


LD 


A,C 


A = 


OBCF 9B 


SBC 


B 


;SIBN - FLA6 KDHPLEHEHTIEREN 


OBDO IS 03 


JR 


0BD5 


ISPRUNB ZUR ADDITION 


Iff lADD (AF.BC.DE.HL) 
IHTEBERADDITlON) Z ■ 


zi * n 




I:DE>SUmAHD 






HL^SUHHAND 





SEITE 35 



mi K 

0BD3 17 
0BD4 tf 
MB*? 
OHUES 
0SD7 7ft 
OKIS 17 
0BD9 9F 
OBDA 19 
DBDSBB 
OfiSC OF 
OBDD AC 
OBDE F2 99 OA 



OKI CS 
affi2EB 
C«E3 CO CF DA 
OKiFl 
m.1 El 
0BE8 CO A4 » 
OBEBES 
OBEC CD iB OC 
OBEF C3 8F OF 



0:HL=SLtlME, OOER I SIEHE ISUB 



LD 

RLA 

SBC 

LD 

PUSH 

LD 

RLA 

SBC 

ADD 

A&C 

RRCA 

XOR 

JP 



0IF2 7C 
0SF3BS 
»F4 CA 9A M 
MF7E5 
0SF8D1S 
mt CO 45 OC 
OBFC C5 
06FD 44 
OBFE 4D 
OBFF 21 00 00 
OC02 3E 10 
«04 29 
OCOS 38 IF 
0C07 EB 
OCOS 29 
0C09EB 
OCOA 30 04 
OCOC 09 
OCOD M 26 OC 
OCIO 3D 
OCll 20 Fl 
0C13 CI 
0C14 Dl 
0C15 7C 
0C1& 67 
0C17 FA IF OC 
OCIA Dl 
KIB 78 
OCIC C3 « K 



OCIF EE BO 
0C21 B5 
«22 28 13 
0C24 EB 
0C2S 01 CI El 
(0C2& CI 
(0C27 El 
0C28 CD CF OA 
0C2B El 
0C2C CD M 09 
0C2r CD CF OA 
0C32C1 
OC33 Dl 
K34 C3 47 08 
0C37 76 
0C3S B7 
0C39 CI 



A,H jSISM Z2 IN CY 

A tSIBN-FLA6 HACH B: 

6,A ;B ■ FF, HEtM Z2 < 0, SQNST B = 

HL \12 RETTEII 

A,D iStGN Zl IM CY 

A jSIM-FLAS Zl, A = FF, HENN Zl < 0, SONST A=0 

Hl,DE ;StWIE BILDEH 

B jlEBERLAUF? mm BEIBE l£6AT]V UHD ERS POSITIV, ODER HENN 

;BEIOE POSITIV Eft8 HEeATIV) 
H 

P,0A99 ;MEIK, HL KACH 1 FERTI8 



IMTEEERADDITIQNS-UEBERLAUF 



f^SH K ;Siai-FLAB 12 ftETTEH 

EI DE.HL JZIHACHHL 

CALL OACF -7«.S SIM6LE NACH X 

POP tf ;SI6N-FLM Z2 NACH A 

POP HL )Z2 lumEEK 

CALL 09A4 ;I AUF STACK RETTEN 

EI DE.HL -,12 MCH BE 

CALL 0C6B iZ2 ALS SINGLE NACH \ 

JP OFBF \l * ISTACK) NACH I (Zl + Z2 NACH X) 



UP 



IHLT (AF,BC.DE,HL) 
IHTEBERflULTlPLIKATIONt Z = Zl I Z2 
l:D£=FAKTQR 
M.=FAKTOR 
OiHL>PROIHJKT, ODER I SIEHE ISUB 



LD 

OR 

JP 

PUSH 

PUSH 

CALL 

PUSH 

LD 

LS 

LO 

LD 

ADD 

JR 

EI 

ADD 

EI 

JR 

ADD 

JP 

DEC 

JR 

POP 

m- 

LO 

JP 

POP 

LO 
JP 



A,H 
Z,0A9A 

hi! 

DE 

DC45 
BC 
B,H 

C,L 

hl.oooo 

A, 10 

HL.Hl 

C,0C2& 

DE.HL 

HL.HL 

DE,HL 

NC,OCtO 

HL.BC 

C,OC24 

HZ,OC04 

BC 

OE 

A,H 

A 

H.OCIF 

OE 

1^4D 



{Z2 = 0? 

jjft, Z2 = ERG, FERTIG 

iZ2 RETTEtl 

;Z1 RETTEH 

iVORZEICHEN ENTFERNEH tSISN Zl XDR SIGN Z2 NACH B7) 

;SI6H-FLA6 RETTEN 

;Z2 NACH BC 

;EReRE6 LDESCHEK 
;t6D DURCHLAUEFE 
jER6 t 2, UEBERLAUF? 
jJA 
;Z1 t 2 

;HAECHSTES BIT 6ESETZT7 

;NEIN 

;JA, Z2 AUF Efi6 ADDIEREN, UEBERLAUF? 

;JA 

;FERTI8? • 

;HEIN, KITER 

iSIGN'FLAS ZUftUECK 

;Z1 NACH BE ZURUECK 

{ERG > 327670? 

)JA, UEBERLAUF 

;Z2 AUS STACK ENTFERNEN 

{ERSEBNIS HIT S16H-FLAG KORRIGIEREN 



INTEBERflULT IPLI KAT lONS-UBERLAUF 



I(» 

OR 

JR 

EI 

LO 

POP 

POP 

CALL 

POP 

CALL 

CALL 

PDF 

POP 

JP 

LD 

H 

POP 



80 

L 

Z,0C37 

K,M. 

BC,E1C1 

BC 

HL 

OACF 

HL 

09A4 

OACF 

BC 

OE 

0847 

J'' 

BC 



jER6 = 327680? 

;JA 

[11 NACH HL 

SIGH-FLAG ZURUECK) 
Zl MCH HL ZURUECK) 
Zl ALS SINGLE HACH I 

l\ fiUS \ MIF STACK 
Z2 ALS SINGLE NACH I 
iZl AUS STACK NACH r 

;I > V t I (> Zl I Z2] 

iSIGN-FLAG NACH A 

•,ER6 HESftTIV? 

;Z2 HACH BC ZURUECK 



SEITE 36 



X3A FA 9A OA 
0C3B DS 
0C3E CD CF OA 
0C41 Dl 
0C4! C3 82 09 



0C45 7C 
K4& AA 
0C47 47 
0C4B CD4C K 
0C48EI 
0C4C 7C 
K4DI7 
0C4E F2 9A OA 
0C51 AF 
0CS2 4F 
0C53 95 
0C34 6F 
0C55 79 
OCU 9C 
0C57 67 
0C58 C3 9A OA 



UP 



0C3B 2A 21 41 
OCK CD S) OC 
OUl 7C 
0Ci2 EE SO 
0C&4 B5 
OCiS CO 
OCU EB 
0C&7 CD EF OA 
OCU AF 
0C66 01, 98 
OC&D C3 69 09 



0C70 21 2D 41 
0C73 7E 
0C74 EE BO 
0C76 77 



UP 



OC77 21 2E 41 
0C7H 7E 
0C7B B7 
0C7CEe 
0C7D 47 
CC7E2B 
0C7F 4E 
OCSO 11 24 41 
0C83 lA 
0C84 B7 
OCBS CA F4 09 
0C88 90 
0Ca9 30 16 
0C8i 2F 
OCSC 3C 
0C8I FS 
OCSE D£ 08 
0C90 23 
0C91 E5 
0C92 lA 
0C93 46 
0C94 77 



i? n,0A9A ;JA, HL 1= -32768D} ALS £it& NACH I 

niSK DE ]Z1 RETTED 

CALL OACF iHL d -3276BD) MACH X ALS SINBLE 

POP K jZl lUftUECK 

JP 0982 il - -X II = 32768DJ, FERTI6 



ZKIEfiKmPLEKHT ENTFERHEN 



LD 

IDR 

LD 

CALL 

EX 

LS 

OR 

JP 

m 

LD 

SUB 

LD 

LD 

SBC 

LD 

JP 



A,H 
S 

0d4C 

K.HL 

A,H 

P,0A9A 

A 

c,. 

L,A 

i'' 

H.A 
M9A 



iSISN HL » SI&H DE? -> B7=0, SOHST =1 

;AB5 (K.) BILDEN 
)DE HACHHL 
(ABS IHL) BILDEN 
;tl < 0? 
)JA, HL MCH X 
;A = 
;C=0 
;1i - L HACH L 

;0 - H NACH H 
SNL BACH X 



IHE6 IAF,BC,DE,».I 

HEBATIVEH KRT EINEf) IHTE6ERZAHL 

liX-AMUKIIT 

OiI^FUNKTintSKRT 

LD 



CALL 

LD 

lOR 

M 

RET 

El 

CALL 

XOR 

LD 

JP 



HL,i412n 
OCSl 

Si" 

L 

HZ 

BE.HL 

OflEF 

A 

B.98 



{ARS NACN HL 

;0 - ARS NACH HL UNO I 

;HL = 32768D? 



jncini rcniiD 

jJA, HL IN SIH6LE UHHAMDELH IDHNE SIM BIT) 



;KIN, FERTIG 
jJA, HL IN SIHq 
;TYh = SINffl.E 

;EXP = 18 
;SPRU(tB IN FLOATA 



90UBLE-PREC ISI ON-AR I THHET I K 



DSUB lAF.BC.DE.HLl 
BOUBLESUBTRAKTIDN: 
ltX>NIIIUEND 

V-SUBTRAHEHT 
Q:I>D1FFERENZ 
LD HL,412D 

LB A.IU] 

XOR » 
LD (HL),A 



I = Zl - Z2 



;ZEIBEii AUF IfiB Y 
fZ2 = - Z2 



DADB (AF.BC,DE,HL) 
OOUBLEABDITIW: 1 > 
IiI>SUHHAW} 
T'SUflHAND 
0:X'SUIME 
Lfi HL,412E 

LD A, IHL) 

A 

C.IHL) 
K,4124 
A, IDE) 

Z,09F4 



Of) 
RET 
LD 
BEC 

LD 

LD 

LD 

OR 

JP 

SUB 

JR 

CPL 

IK 

PUSH 

LD 

INC 

PUSH 

LD 

LD 

LD 



NC,0CA1 

A 

AF 

C,08 

HL 

HL 

A,(DE) 

B.IHL) 

IHLl.A 



II + Z2 



;IE16ER AUF EXP Y 

jZ2 « 0? 

;JA, Zl IN X 1ST ER6EBNIS 
:EXP 22 KACH B 
;IEI6ER AUF MSB Y 
;SI6N Z2 NACH C 
;ZE16ER AUF EIP ) 

;Z1 = 0? 

;JA, Z2 UN Y) NACH X, FEftTI6 

iEXP Zl - EXP 22 NACH A, EXP Zl >- EIP 22? 

iJA 

iNEIN, EIPDIF = -EIPDIF, Zl UHD 22 VERTAUSCHEN 

;EXPD1F RETTEN 

(BYTEZAEHLER 

;ZEI6ER AUF EXP Y 

;fiETTEN 

|1 BYTE VERTAUSCISH 



SEITE 37 



OC95 73 
0C94 12 
K97 IB 
0C98 ZB 

0C9fl 20 F6 
mC El 
0C9D 46 
KK 2fl 
0C9F *E 
OCM Fl 
OMl FE 3') 
0CA3 DO 
OCfll F5 
OCfiS CD W 09 
OCU 23 
0CA9 3i 00 
OCAI 47 
OCAC Fl 
OCAB 21 2D 41 
OCBO CD if OD 
0CB3 3A 26 41 
0CB4 32 IC 41 
OCB? 78 
OCBA B7 
OCBB F2 CF OC 



OCK CD 33 00 
OCCl D2 OE OD 
0CC4 EB 
0CC5 34 
KCi Cfi B2 07 
0CC9 CD 90 OD 
OCEC C3 OE OD 



OCCF CD 45 OB 
0CD2 21 25 41 
0CD5 DC 57 OD 



0CD8 AF 
0CD9 47 
OCDA 3A 23 41 
OCDD B7 
OCDE 20 IE 
OCEO 21 IC 41 
0CE3 OE 08 
OC£S 56 
OCEi 77 
0CE7 7A 
0CE8 23 
«I9 00 
OCEA 20 F9 
OCEC 78 
OCED Df> 08 
OCEF FE CO 
OCFl 20 Ei 
0ff3 C3 78 07 



OCFi 05 
0CF7 21 
OCFfl CD 
OCFD B7 
OCFE F2 
ODOl 76 
OD02 B7 
0DO3 28 
0D05 21 
0DO6 Bt> 
0DO9 77 
ODOA D2 

ODOD ce 

ODOE 3A 
ODU B7 
0D12 FC 
0D15 21 



IC 41 
97 OD 



H OC 



09 
24 41 



78 07 
IC 41 



20 OD 
2! 41 



LD 

LD 

DEC 

DEC 

DEC 

JR 

POP 

LD 

DEC 

LD 

POP 

CP 

RET 

PUSH 

CALL 

iW 

LD 

LD 

MP 

LD 

CALL 

LD 

LD 

LD 

OR 

JP 



A.B 

(D£),A 

K 

HL 

C 

NZ,0C9Z 

HL 

B.IHL) 

ii 

C,(KL) 

AF 

39 

K 

AF 

09DF 

HL 

(HD.OO 

Y 

HL,412D 
0D69 
A, (4126) 
(411C),A 

'/ 

P.OCCF 



iZEIBER DEC. 

iFERTIS? 

;HIN, KITEfi 

jZEIGER AUF EJP Y ZUBUECK 

■,n? T MCH B 

iZElGER AUF HSB Y 

;ttSB Y HACH C 

iEIPDIF ZUfiUECK 

jEIPDIF >= nAMTISSEM.AEN6£ * 1? 

:JA, FERTIG 

jEXfDIF RETTEN 

iSISH-BITS ENTFERNEN, SISM-FLAfi DES ERGEBNISSES BILDEN 

;CARRY Fl€R RECKTS^HIEBEN VON Y (4126) L0E5CHEN 

'S16H~FLAG HACH B 

rfXPDlF ZURUECK, SIBT ANZAHL DER VERSCHIEBUWEH AH 

iJEIBEH AUF USB Y 

;Y UK A-filTS RECHTSVERSCHIEBEH 

;HERAUS6ESCH0BENES BYTE NACH 1 UHSPEICHEW 

iSIBH Zl = SI6H Z2? 

;NEIN , SUBTRAKTIDN 



ABDITIfflt l^R HANTISSEH 



CALL 0D33 inANTISSENADDITIONA, UEBERLAUF7 

JP «:,0DOE iHEIH, ZUn SCW.USS 

EI DE,HL ;HL m EIP i 

IHC IH) ;EIP I t 1, UEBERLAQF? 

JF Z,0762 iJA, OV-ERROR 

CALL 0D90 ilUHTiSSE m EIN BIT RECHT5 SCHIEBEN 

JP ODOE jZWf SCHLUSS 



SUBTRAKTION DER HAHT15SEH 

CALL 0D45 jHAHTiSSEMSUSTRAKTlON 

LD HL,4125 jZEIGER AUF SIBN-FLftE 

CALL C,6D57 jUNTERLAUF? --> nil = - «>, SIGH-FLAG KOHPLEBEHTiEREH 

NORNALISIERUNG 



lOR 

LD 

LD 

[» 

JR 

LD 

LD 

LD 

LD 

LD 

IKC 

DEE 

JR 

LD 

SUB 

CP 

JR 

JP 



A 

B,A 

A, (41231 
A 

HZ, OCFE 
HL,411C 
C,08 
D,(l«.) 
IHD.A 
A,D 

hL 

C 
HZ,0CE5 

Si' 

CO 

HI,0CD9 

0778 



VERSCHIEBUNGSZAEHLER ^ 

ftSB I LADEN 

= ? 

(SIN 

JA, I 1 BYTE LINKS SCHIEBEN 

BYTEZAEHLER 

BYTE LADEN 

LETZTES flWE AH DIESE POSITIDH 

ZEIGER IK. 
FERTIG? 
HEIN, UEITER 
VERSCHIEBUNGSZAEHLER - 8 

40 VERSCHiEBUHGER VOR&EHONICH? (I = d) 
HEIN, HEITER 
Jfl, 1=0, FERTIG 



NORHALISIERUNG 2 

DEC B 

LD 

CALL 

DR 

JP 

LD 

OR 

JR 

LD 

ADD 

LD 

JP 

RET 

LD 

OR 

CALL 

LD 



HL,411C 
0D97 
A 
P,0CF6 

{•• 

Z.ODOE 

hL,4]24 

(HLJ 

(HD.A 

HC,077S 

A, (4110 
A 

n,OD20 
hL,4125 



iUERSCKIEBUNGEH - I 

;ZEIGER AUF LSB I 

■,1 m EIH BIT LIMES VER5CHIEBEN 

;HOECHSTieRTIGSTES BIT 6ESETIT? 

*K1N HEITER 

■AHZA^L DER VERSCHIEKIHGEH = 0? 

iJA, ZUH SCHLUSS 
ZEIGER AUF EXP I 

VERSCHIEBUNGEH + EIP X ERGIBT HEUEN EIP I 
ABSPEICHEREH 

UHTERLAUF' -> JA, 1=0, FERTIG 
1=0? --> FERTI6 
HOECMSTHERTIGSTES bit VfW LSB X * 0? 

iHEIH, I RUHDEH 
iZElBER (ASf SIGN FLAG 



SEITE 38 



0D18 7E LD A, (HI) :LAKN UNO SI&N-FLA6 HERAUSBLENDEN 

0D19 E6 ao AND BO 

ODIB 26 DEC KL ;ZEI6ER AUF flSB I 

ODIC 26 DEC HL 

ODID AE m (HL) ;SIEN-FLA6 IflVERTIEREN UHD HIT HSI i VERKHUEPFEK 

DDIE 77 LD (HD.A ;UND flSB I HIT SIBN ABSPEICHERH 

ODIF C? RET 



ftUKDUHG 

0020 2t ID 41 LD HL,4nD ;ZEI6ER AUF LSB I 

0D23 Oi 07 LD B,D7 j7 BYTES IHANTISSEI 

01)25 34 IK IW.) ;SYTE * 1, ItEKRLAUF? 

0D2& CO RET KZ jNEIH, FERTI6 

0D27 23 INC W. ;JA, HECHSTES BYTE 

0D28 OS KC B tFERTIS? 

0D2? 20 FA JR IIZ,0D2S )II£IH, HEITER 

0Q2B 34 IK IHL) ;CARItY SURCH 6AHZE HANTISSE: EXP I * 1, UEBEflLAUF? 

0D2C CA 12 07 JP Z,07I2 ;JA, OV-ERRDR 

0D2F 2B DEC Hi ;NSB 1 = 80 

0D30 3&8D LD (HL),80 

0D32 C9 RET 



UP DHADD (AF,C=00,DE=4124,HL=412E) 

DQUBLEHANTISSEUDDITIW 

I:HI'StMIAND 
NY'SUMUHD 

Oifl]I=SUIME 

0D53 21 27 41 LD HL,4127 ;IEieER AUF LSB Y 

0D36 U ID 41 LD H,411B jZEISER AUF LSB i 

mi OE 07 LD C,07 !7 BYTES 

0831 AF lOR A ; CARRY LQESCHEH 

ODIC lA LD A, (BE) ;BYTE HIS X LADEN 

OeSB SE ADC (HL) ;BYTE AUS Y ADDIEREH 

OSIE 12 LD (DE),A ;UND SUHHE IN X APSPEICHERH 

0D3F II INC DE ;ZEIGER IHC. 

OHO 23 INC HL 

0041 OD DEC C ;FERTI8? 

OMZ 20 F8 JB NZ.ODSe ;N£IN, NEITER 

0D44 C? HET 



UP BBSUB (AF,C'00,D£'4124,HL=412E) 

DDUBLENANTISSEHSI^TRAKTIOH 

I:HI>)11HUEND 
HY^SUBTRAHENT 

0:HI=>D1FFERENZ 

0D4S 21 27 41 LD HL,4127 jZEIBER AUF LSB Y 

0D48 11 ID 41 LB DEMllD ;ZEI6ER AUF LSB I 

0D4B OE 07 LD C,07 !7 BYTES 

0D4D AF lOR A ;CAf»V LQESCHEH 

064E lA LD A,(DE) ; BYTE AUS X' LADEN 

0D4F 9E SBC (HL) :BYTE AUS Y SUBTRAHIEREN 

0D50 12 LD (DE),A jUHD DIFFEI^HZ IN X ABSPEICHERtt 

ODSl 13 INC BE iZEIBER INC. 
0D52 23 INC HL 

0D53 OD DEC C ;FERTI6? 

0DS4 20 F8 JR NZ,004E iHEIH, NEITER 
0D5& C9 RET 



KAHTISSE VDN I KONPLEHTIEREN 

0DS7 7E LB A,(HL] )SI8H-FLM KOflPLENEHTIEREII 

0058 2F CPL 

0D59 77 LB (HL),A 

005A 21 IC 41 LD HL,411C ;ZEI6ER AUF LSB I 

0D5B 96 08 LD B,08 iB BYTES 

0D5F AF lOR A 

ODiO 4F LD C.A }C ' 

0061 79 LD A.C jA = 

0062 9E SBC (HL) ;BYTE VDN ABZIEWN UN HIEKft ABSPEICHERH 

0063 77 LD (W.1,A 

0064 23 INC HL ;ZEI6ER AUF HAECHSTES BYTE 
0D65 05 DEC B jFERTIB? 

am 20 F9 JR NZ,0D61 ;NEIN, NEITER 

0D68 C9 RET 

0D69 71 LD (HL),C jHSfi ABSPEICHERN 

\ff RLNA (AF,C,DE=OOO0) 

8 SPEICHERZELLEH recnts schieben 
IiA-AHZAHL DER VERSCHIEBUNSEH 
HL=ZEI6ER 

SEITE 39 



fHL)..(tfl.-7)=SPEICHERBEIiEICH 
D:(HL}..(HL-7)=WI fl-BIT VERSCHOKH 

ODifl £5 PUSH HL ;IEIGER RETTEM 

0D6B U 08 SUB OB )8 ODER KEHR VERSCHIEBUN6EN? 

ODiD 3S OE JR C,0D7D ;NEIN 

0D6F £1 POP HL ;ZEI6ER ZURlffCK 

0D70 ES PUSH HL ;1WD HIEDER RETTEM 

0D71 11 00 Ofi LD DE.MOO ;BYTEZflEW.ER = 6 UNO ZKISCHEKSPEICHER LOESCHEN 

0D74 4E LD C.IHL) ;ByTE NACH C 

0D75 73 LD (HL),£ jLETZTES BYTE EINTRMEN 

0074 59 LD E,C ;C IH ZHISCHENSPEICHER 

0D77 2B DEC HL jZEISER KG. 

0D7fl 15 DEC D iFERTIB? 

0D79 20 F9 JR HZ.0D74 ;NEIN, KEITER 

0D7B 18 EE J« 0D6B jKITEfl, NAEEHSTE BTTEVEfiSCHIEBUKS 

0D7D C6 09 ADD 09 ; VERSCHlEBUNSN M NMH D 

0D7F 57 LD D,fl 

0D80 AF lOR fl lUmi LOESCHEN 

OMl El POP HL jZEIBER ZUWECK 

0D82 15 DEC D ;NOCN EINE VERSCHIEBUN6? 

0083 C8 RET I iMEIN, FERTIG 

0D84 E5 PUSH HL ;2EI6Efi REHEB 

0D85 IE 08 LB E,08 ;BVTEIAEHLER = 8 

0W7 7E LD fl,(HLl jBYTE LfiDEN 

0DS8 IF RRA ;1 BIT HACH RECHTS SCHIEBEH 

0089 77 LD (HL),A )UND MIEDER HBSPEICHERK 

0D8fl 2B DEC HL jZEISER DEC. 

0D8B ID DEC E iFERTIE? 

ODaC 20 F9 JR NZ,0Da7 ;N£IN, KITEfl 

0D8E 18 FO JR 0080 jHAECHSTE BIT-VERSCHIEBUNG 

UP RRK (flF,DE=OOO0,HL=4]231 

SPEICHEfiBERElCH * 1 BIT RECHTS SCHIEBEN 

l:X<SPE]CKERBEREICH 

0:](=SPEICHERBER£ICH UH 1 BIT VERSHQBEN 
mH 21 23 41 LD HL,4123 ;Z£ISER AUF MSB I 
0D93 1& 01 LD D.Dl iUH 1 BIT VERSCHIEBEH 
0D95 18 ED JR 0M4 

UP RLH (AF,C=O.HL+B) 

SPEICHERBEREICH UH EIN BIT LINKS SCHIEBEN 

i : (HL) . . (HL+7)"SPEICHERRREICH 
CY>)IACHZUSCHIEBEND£S BIT 

0:(HL}..(^+7)=UI1 1 BIT UERSCHOBENER BEREICH 
0D97 OE 08 LD 

0D99 7E LD 

0D9A 17 RLA 

0D9B 77 LD 

0I19C 23 IK 

0D9B OD DEC 

0D9£ 20 F9 JR 

ODftO C9 RET 



C,08 


BYTEZAEHLER = 8 


A,(HL) 


BYTE LADEH 




HACH LINKS VERSCHIEBEH 


(HLt,A 


IMD ASSF^ICHERN 


HL 


ZEIGER INC. 


c 


FERTI6? 


«,0D99 


KEIH, UEITER 



UP MLT lflFjflC,D£,HL) 

DOUBLEIIULTlPLIKATIONi Z < Zt t Z2 

I:I=FAKTDf) 
Y=FftltTQR 

0:I=PROOUKT 

ODAl Cfl 55 09 CALL 0955 lU (IH I) « 0? 

0DA4 CB RET Z ;Jfl, FERTI6 

0DA5 CD OA 09 CALL 09M )EIP IMD VORZEICHEH VERARBEITEN 

OOAfl CD 39 OE CALL OE39 jNZl NACH (414A).. (41501, HI ALS ERBEBHISSPEICHER LOESCHEN 

OBAB 71 LD (H),C )LSB K LOESCHEH 

ODAC 13 INC BE jZElGER AUF LSB Zl 

ODAD 06 07 LD 8,07 ;BYTEZAEHL£R = 7 

»Af lA LD A,(DE) ;BYTE WW ZI LADEN 

ODBC 13 INC D£ -ZEISER IHC. 

OOBl B7 OR A i= 0? 

0DB2 D5 PUSH DE ;ZEI6ER RETTEH 

0DB3 28 17 JR Z.ODCC -JA 

0DB5 OE 08 LD C,OB ;NEIH, BITZAEHLER ■ 8 

0DB7 C5 PUSH Bt jBITZAEHLER RETTEH 

OMS IF RRA iNAECHSTES BIT SESETZT? 

0D89 47 LD B,A (B^TE NACH B 

ODBA DC 33 OD CALL C,0D33 jJA, Zl AUF ER6 ADDIEREH 

Si??5 .^n° '° "^ "'■'- *•"" ;ERG Ufl EIN BIT HACH RECHTS ftOTIEREN 

OKO 78 LD fl.B jBYTE ZURUECK 

SSfi fj •*"'* ^ ;BITZA£HLEfi ZURUECK 

0DC2 OD DEC C {BYTE ABSEARBEITET? 

SEITE 40 



0DC3 20 F2 
OKSBt 
ODC& OS 
0K7 20 U 
OKf C3 DS OC 
OKC 21 23 41 
OKF CD 70 OB 
m2 18 Fl 



JR 

POP 

DEC 

JR 

JP 

LD 

CALL 

JR 



NZ,0DB7 
BE 
B 
NZ.OBAF 

ocbe 

HL,4123 

OB70 

0DC5 



;KIN, MECHSTES BIT 
iZEIBER 2URUECK 
jALLE 7 ims flBSEARBEITET? 
;KEIN, HECHSTES BYTE 

;0-BYTEi ERSEBtllS UH EIN BYTE RECHTSSCHIEBEN 

jHAECHSTES BYTE 



KONSTAKTE 
0I»4 00 00 00 00 00 DO 20 84 
MBN 00 DO 20 B4 



;KDHSTHTE 10 (DOUBLE) 
;KDNSTANTE 10 (SIII6LE)) 



ODSC U D4 OD 
ODBF 21 27 41 
0DE2 CD D3 09 



UP DDIVIO (AF.BC.DE.HL) 

DOUBLEDIVIDISIDN DUROJ lOD 

l!X=ZAHL 

Ot!l=ZAHL 

LD BE,0DD4 jIEIBER AUF K0N5TANTE lOD 

LD HL,4127 jZEISER flUF Y 

CALL 07D3 ;l!(MST»iTE lOD liACH Y 



UP 



0DE5 3A 2£ 41 
ODEB B7 
0DE9 CA 9A 19 
ODEC CD 07 09 
ODEF 34 
ODFO 34 
OBFl CD 39 OE 
00F4 21 51 41 
0Df7 7] 
ODFS 41 
0DF9 11 4A 41 
ODFC 21 27 41 
ODFF CD 4B OD 
0EO2 lA 
«03 99 
OE04 3F 
OEOS 38 OB 
0E07 11 4A 41 
OEOA 21 27 41 
OEOD CD 39 OD 
OEIO AF 
OEM DA 12 04 
I0E12 12 
(0E13 04 
OEM 3A 23 41 
0E17 3C 

uie 3D 

0E19 IF 
OEIA FA 11 OD 
OEID 17 
OEIE 21 ID 41 
0E21 OE 07 
0E23 CD 99 OD 
0E2i 21 4A 41 
0E29 CD 97 OD 
0E2C 7a 
0E2D B7 
0E2E 20 C9 
0E3O 21 24 41 
0E3J 35 
0E34 20 C3 
mt LZ B2 07 



0E39 79 
0E3A 32 2D 41 
0£3D 2B 
0E3E 11 50 41 
0E41 01 00 07 
0E44 7E 
0E45 12 
0E44 71 
0E47 IB 



DDIV (AF.BC.OE,*.) 
DOUBLED I VI SIDN: Z = 
ItX=DIVIDENT 
Y=D1 VISOR 
Oil'dUDTIEKT 
LS 
QR 
JP 
CALL 
IHC 
IK 
CALL 
LD 
LD 
LD 
LD 
LD 
CALL 
LD 
SBC 
CCF 
JR 
LD 
LD 
CALL 
lOR 
JP 
LD 
IK 
LD 
IK 
DEC 
RRA 
JP 
RLA 
LD 
LD 

CALL 
LD 

CALL 
LD 
OR 
JR 
LD 
DEC 
JR 
JP 



A, I412E) 

Z.mfl 

0W7 

IHL) 

(HL) 

0E39 

HL,4151 

ihL},c 

B.C 
st,414A 

HL,4127 
0D4B 
A, IDE) 
C 

C,0E12 

DE,414A 

W.,4127 

0D39 

A 

C,0412 

IDE), A 

B 

A, (4123) 

A 

A 

R.ODll 

HL,411D 
C,07 
0D99 
HL,414A 

0D97 

NI,0Iff9 
>fi.,4t24 

(HL) 

NZ,0DF9 

07B2 



Zl / Z2 



!Z2 « 0? 



iJA, 1/0-ERROR 

;VORIEICKEM UHD EIPONEKTEN VERARBEITEN 

;EIP ERB-KORREKTUR! EKP EftS ♦ 2 

f(0W7 ER6IBT EIP 11 - EKP Y - I) 

jHZl NACH (414A1..(4150), K ALS Eft6EB«ISRESISTER LOESEHEN 

jHOECHSTKERTieSTES BYTE VM Zl = 

IFLAG LOESCHEN 

;ZEI6ER AUF It 

;ZEI6ER AUF Z2 

■,1\ - 11 BACH Zl 

;nSB Zl LADEN 

!- CY (C=0) 

[CY KQ«PLE«IITIEREIf, UHTERLAlff? 

;K1N, 1 IN ER6 EINSCHIEBEN 

iJA, SUBTRACTION RUECKBAENBIG: ZEI6ER AUF 21 

jZElBERAUf Z2 

;ZI * 22 HflCH Zl 

; CARRY LOESCHEN 

)SPfiU»6 NIRD HIE AUSBEFUEHRT! 

;nSB Zl ABSPEICHERN) 

iFLAfi SETZENl 

;HS6 ERB NACH A 

jBIT 7 BESETZT? 

{BERADE ERHITTELTES BIT NACH A7 Zl)R RUNDUNG 

; PERT IB, RUNDUN6 

IBIT NIESER IN CY 

;ZEIBER AUF LSB ER6 

;IYTEIA£HLER > 7 

iERB LINKSROUTIEREN, UNO BIT EINSCHIEBEN 

tlEIBER AUF II 

jZl UN EIN 1 BIT LINKS ROUTIEREN 

iFLftS 6EBETZT (D.H. H-BIT EIH6ESCN0BEN) 

;JA, NEITER 
;NEIH, EIP ER6 - 1 
iUHTERLAUF? 
I KIN. WITER 
;JA, dv-ERROR 



UP FUER Dm.T UDD DBIV 



LD 

LD 

DEC 

LD 

LD 

LD 

LD 

LB 

DEC 



(Jl20),A 

HL 

DE,415D 

BC,07OO 

fl.lHL) 

())E),A 

(HL),C 

DE 



;ttSB Y (OKNE SIEN) ABSPEICHERN 

jZEIBER AUF HSB X 

jZEIOER AUF 3.REGISTER FUER DBLT/DDIV 

;I IM 3.REG UEBERTRAGEH UND LOESCHEN, eYTEIAEHLER=7 

;UND ABSPEICHERN 

lUND BYTE VON K LOESCHEN 

;ZEI6ER DEC. 
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mi 2B DEC HL 

0E49 05 DEC B iFESTIG? 

0E4A 20 FB JR NZ,DE44 ;N£IN, HEITEfl 

0E4C C9 RET 



UP HILTIO (AF.BC.De.ttL) 

DOUBLENULTIPLIKATIM HIT lOD 

liWAHL 

0:WML 

0E4D CD FC 09 CftLL 09FC jZftHL tttCH T 

0E50 EB EX DE,HL ;IEI6Ef) AUF EIP I HO HL 

reSl 2B DEC HL 

0E52 7E LD A,<HL) (IflHL ' 9? 

OE53 87 Ofi ft 

0E54 C8 KT Z ;JA, Eft6 - 0, FERT16 

0E55 C6 02 ADD 02 ;EIP I * 2 (ZAHL I 4 MCH X), UESERLAUF? 

0e57 M B2 07 JP C,07B2 jJA, OV-ERRW 

OEa 77 L6 lHL),ft ;EltP 1 illEKR ABSPtlEHEW 

OESI E5 PUSH HI |ZEI&ER AUf EIP I RETTEN 

0E5C Cfi 77 OC CALL OC77 {I t Y IfACH 1(1 = 51 lAH) 

OESF El POP HL ;ZEIB£R AUF EIP I ZURUECK 

OEiO 34 INC (HLI ;EXP X t 1 (I = 100 t ZMti.), I£BERIAUF7 

OEM CO RET HZ ;NEIH, FERTI6 

«« CI B2 67 iP ft7B2 fJfi, OV-ERftOR 

UP DVflL (AF,BC,DE,W.=P) 

HANDELT STRING IN ZAHL (DOUBLE) UH 

l!HL=ZEI6ER AUF STRIN6 

0:X=ZAHL 

OEtS CD 79 07 CftLL 0779 iX = 

0E6S CD EC OA CALL OAEC jTVPI > BOUfiLE 

OE&B Fi AF OR AF jFLAB Z ' 

UP LVAL (AF,BC,DE,HL«PI 

UHDELT STRIN6 IH ZAHL PASSEHDEN TYPS OH 

hHL'ZElGER AUF STRtMG 

OiX=ZAHL 

(OE&C AF XOR A ;FLA6 Z = 1) 

0E6D EB EI DE.HL ;PDINTER NACH K 

OEiE 01 FF 00 LD K.OOFF :NACHKQI1HAST.=0, '.'-FLfl6 ■ FF (NACH PIMT 0) 

0E71 60 LD H.B ;«. = 

0E72 id LD L,6 

0E73 CC 9A OA CALL Z,0fl9A iANSPfiUNS LVAL? --> X = 0, TYPI • INTE6ER 

0E7i EB EI Dfe.HL iPOINTER ZltRUECK, EXP-SISf-FLAfi (D) UND EXP (El LDESCHEN 

0E77 7£ LD A.IhD jZEICHEN LADEN 

0£7e FE 2D CP Zfa ;='-'?, JA Z=l 

0E7A F5 PUSH AF jVOfiZEICHEMFLAfi RETTEN 

0E7B CA 83 OE JP Z.OEBS jJA, NAECHSTES ZEICKH 

0E7E F£ 2B CP 2B j='+'? 

OE80 28 01 JR Z,0ES3 ;JA, MAECH5TES ZEICHEH 

0£82 2B DEC HL ;KEIn VQRZEICHEN, POINTER ZURUECK 

0E83 D7 RST 10 ;NAECHSTES ZEK^N, ZIFFEfi? 

0E94 DA 29 OF JP C,0F29 jJA 

0E87 FE 2£ CP 2E !- '.■? 

(«89 CA E4 OE JP Z,0EE4 ;JA 

OEBC FE 45 CP 45 ;« 'E'? (EIPKENNUNG BEI SIN6LE) 

OEBE 28 14 JR Z,0EA4 ;JA 

OE90 FE 25 CP 25 ;= 'I'? (ZAJft. AIS INTEGER BETRACHTEB) 

(£92 CA EE OE JP Z.OEEE ijft 

0E93 FE 23 CP 23 ;= 'I'? (ZAHL ALS DOUBLE KTRACHTEN) 

0E97 CA F5 C4 JP Z,0EF5 jJA 

0E9A FE 21 CP 21 ;= ■!'? 

9E9C CA F6 OE JP Z.OEFi ;JA, ZAHL ALS SIN6LE BETRACHTEN 

0E9F FE 44 CP 44 )- 'D'? (EXPKENNUW BEI DOUBLE) 

OEAl 20 24 JR NZ,0EC7 ;)IE1N 

EXKaENT ERnmELN 

0eA3 B7 W A ;FLAe FUER NACHFOLSENDE TYPANPASSUH6 

0EA4 CD FB 0£ CALL OEFB ;Z«JL IN SINGLE (Z=l) ODER DOUBLE (Z-0) UBHANDELN 

0£A7 E5 PUSH fl jPOINTEfi RETTEN 

dEAB 21 BD OE LD HL.DEBD gRUECKSPRUNBAMESSE 

OEAB E3 EI (SF>),KL ;RIT POINTER UERTAUSCHEH 

OEftC C7 BSl 10 jHfiECHSTES ZEIOIEB 

OEAD 15 BEC D jEXP-SISN-FLAB AUF '-' 

OEAE FE CE CP C£ j' '-'? (TOKEN) 

OEBO CS RET Z ;JA 

OEBl FE 2D CP 2D ;= '-'? 

0EG3 CB RET Z iJA 

8EB4 U INC D jEXP-S16H-fl.AB Wf '♦' 
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(CIS FE CD 

407 CB 
OEtS FE ZB 

aOACS 
0En2B 

OEBCFl 
0EBDD7 
4EBE DA 94 OF 
0£C1 14 
0EC2 » 03 
0EC4 AF 
0ECS93 
OEC& 5F 
0eC7 E5 
0EC8 7S 
0EC9 90 
C€CA F4 OA OF 
oeCB FC 18 Of 
DEIO 20 F8 

«u:ei 

eEI3 Fl 

4ES4 E5 

OEDS CC 7B 09 

OEDBEl 

0eD9E7 

OEDAES 

OESIES 

OEDC 21 90 08 

(£DF ES 

OEEO CD A3 Ofl 

0££3 C9 



CP 

«T 

CP 

KT 

DEC 

POP 

RST 

JP 

INC 

JR 

IDA 

SUB 

LD 

PUSH 

LD 

SUB 

CALL 

CALL 

JR 

POP 

POP 

PUSH 

CALL 

POP 

RST 

RET 

PUSH 

LD 

PUSH 

CALL 

KT 



CD ;= *+'? (TKEHl 

Z |JA 

2fl ;« •*••) 

I ;JA 

HL ;KEIN VOSZEICHEN: POINTER ZUfiUECK 

AF (RUECKSPRUWADftESSE EBTFEMEN 

10 ;NA£CHSTES ZEICHEN, ZIFFER? 

C,OF94 iJA 

D ;N£IH, a? FEBTIfi: EIP-SIM-FLA6 ■ '-"> 

NZ,0EC7 jNEIH 

A iJfl, EXP « - EKP! A*0 

£ ;0 - EXP HACN EIP 

E,fl 

HL ;POINTER RET7EH 

A,E jEIP - NACHKONHASTELLEH HACK A 

fl [DIIFFERENZ > 0? 

P.OFOA )JA, Z6HL I lOD, DIF - 1 

H.OFIS jffitN, ZAHL / IM, DIF + 1 

NZ.OECA ;BIS DIF < 

HL iPOINTEIt ZURUECK 

AF ;SI6N-FLA6 ZURUECK 

HL iPDINTER HIEBER RETTEH 

Z,097B ;S1GN-FLA8 * '-■? --> I = - 1 

HL iPDINTER ZURUECK 

20 ;TyP TESTER 

PE jDOUBLE? -> FERTIB 

HL fPOINTER RETTEN 

HL,0890 ;RISCKSPRUWADRESSE SETZEK (POP HL, RET) 

0AA3 iSIKSLE KNN HOESLICH IN INTESER UMUNDELII 
;PDINTER ZURUECK 10890) UND FERTI6 





DEZIHALPUNKT VERARBEITEN 


0EE4 E7 


RST 


20 


;Typ TESTEN 


OEES OC 


IHC 


C 


i'.'-FLA6 ' 0?, (D.H. SCHDN EIN '.') 


i£E6 20 DF 


JR 


NZ,0EC7 
CjOEFB 
0E83 


;JA, FEfiTIE 


OEES DC FB OE 
OEEF C3 83 OE 


CALL 
JP 


iSINBLE, INTESER --> IK SIN8LE UHNANDaM 
;MECHSTES ZEICHEN 


OEEE E7 


'I' 

RST 


20 


iTYP TESTEN 


OEEF F2 97 19 


JP 


P,I997 


iKEIH INTESER? --> SN-ERROR 


0EF2 23 


INC 


HL 


jPOIHTER INC, 


0EF3 IB 02 


JR 


0EC7 


; PERT I 8 


0EF5B7 


Ofi 


A 


;FIA6 FUER TYPAHPASSUN6 


0EF4 CD FB OE 


CALL 


OEFI 


;I IN SIRSLE ODER DOUBLE (Z * 0) URHANDELI 


0EF9 18 F7 


JR 


0EF2 


IHEITER 


UP 


CREAL 


(AF) 






NANDELT ZAHL IN SINGLE ODER DOUBLE UN 




IjZ»1, 


UWANDLltK IN SIHSLE 




Z=0, 


UHUWDLUNe IN DOUBLE 




{■ZAHL 






Oil'ZAHL 




OEFB £5 


PUSH 


HL 


;R£6ISTEB RETTM 


tSFC D5 


PUSH 


DE 




OEFD C5 


PUSH 


BC 




OEFE F5 


PUSH 


AF 


[FLAB RETTEB 


OEFF CC Bl OA 


CALL 


Z.OABl 
AF 


;Z'l? -> ZAHL IN SINGLE IMANDELR 


0F02 Fl 


POP 


;FLA& ZURUECK 


OF03 C4 DB Ofi 


CALL 


NI.OADB 


fZ*0? --> lAHL IN DOUBLE UWANDELH 


OFOi CI 


POP 


BC 


; REGISTER ZURUECK 


0FO7 Dl 


POP 


DE 




OFOB El 


POP 


HL 




0f09 C9 


RET 







OFOA C8 
OFOB F5 
OFOC E7 
OfOD F5 



UP RHLTIO lAFjBC.DE.HLl 

flULTIPLIZIERT ftEELLE ZAHL HIT 100 
1:WAHL 

2=0 
0!K=ZAHL 



RET 
PUSH 
RST 
PUSH 



Z 

AF 
20 
AF 



iZ " i?, ZURUECK 
:A RETTEN 
iTYP TESTEN 
ITYP-FLAS RETTEN 
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OFOE E4 3E 09 
OFll Fl 
(H^IZ EC 4D OE 
^15 Fl 
OFIi 5D 
Of 17 C9 



OFIB D5 
0F19 E5 
OFIA F5 
OFIB E7 
OFIC F5 
OFID E4 97 08 
0F20 Fl 
0F21 EC DC OD 
0FZ4 Fl 
0F2S El 
0F2i Dl 
0F27 3C 
0F2B C9 



(f 2! D5 
0F2fl 78 
ff2fl 89 
0F2C 47 
Of 2D C5 
0F2E E5 
£f 2F 7E 
0F30 D6 30 
ff32f5 
OF33 E7 
Of 34 F2 5D OF 



0F37 2A 21 41 
(ffZH 11 CD OC 
0F3D DF 
0F3E 30 19 
Of40 54 
0f41 5D 
0F42 29 
Of 43 29 
0F44 19 
0f45 29 
0F46 Fl 
0f47 4F 
0F48 09 
i)F49 7C 
0F4A B7 
0F4fl Fft 57 Of 
0F4E 22 21 41 
0F51 El 
W52C1 
0F5J Dl 
0F54 C3 83 OE 
Of 57 79 
0F5fl F5 
0F59 CD CC Ofl 
OFK 37 
0F5S 30 18 



OfSF 01 74 94 
0f&2 11 00 24 
Of 65 CD OC Ofl 
OFiB F2 74 OF 
0F6I CD 3E 09 
0F4E Fl 
0F6f CD 89 OF 
0F72 18 DD 



0P74 CD E3 Ofl 
OF77 CO 4D OE 



CALL 

POP 

CflLL 

POP 

DEC 

RET 



P0,093£ ;DOUBLE? --> NilLTlPLIKATIOH HIT lOD 

flf jTYP-FLflS ZUfiUECi; 

PE,0£4D jSIKGLE? --> BULTIPLlKflTION HIT lOB 

AF ;fl ZlffiUeCK 

A ;A - 1 MCH A 



UP RDIVIO IflH.BC) 

DIVIDIEOT REELLE ZAHl DURCH lOD 
I]I=ZAttL 



PUSH 

PUSH 

PUSH 

RST 

PUSH 

CALL 

POP 

CALL 

POP 

POP 

POP 

INC 

RET 



DE 

HL 

flf 

20 

flf 

P0,0897 

AF 

PE.OODC 

AF 

HL 

DE 

A 



LD 

ADC 

LD 

PUSH 

PUSH 

LD 

SUB 

PUSH 

RST 

JP 



IMTEBER 

LD 

LD 

RST 

JR 

LD 

LD 

ADD 

ADD 

ADD 

ADD 

POP 

LD 

ADD 

LD 

OR 

JP 

LD 

POP 

POP 

POP 

JP 

LD 

PUSH 

CALL 

SCF 

JR 



HL,(4121) 

DE.OCCD 

18 

K;,0F59 

D,H 

EL 
HL.HL 

HL,HL 

HL,DE 

HL.HL 

AF 

hLbc 

A,H 

H,0f57 

14121), HL 

HL 

BC 

DE 

0E83 

A,C 

AF 

OACC 

NC,0F77 



;DE UNO HL RETTEN 

iAF RETTEH 

ilYP TESTEH 

;TYP-FLA6 KTTEH 

iSINSLE? -> Division DURCH lOD 

iirP-FLAB ZURUECK 

jDOUiLE? -> DIVISION DURCH lOD 

iflF, Ht-UHD DE ZUfiUECK 

;A t 1 tiflCH A 



ZIFFER VERflRBEITEK 
PUSH DE 

.r 

A,(HL) 

30 

AF 

20 

P.OFSD 



SIN6LE 

LD 

LD 

CALL 

JP 

CALL 

POP 

CALL 

JR 



DOUBLE 

CALL 0AE3 
CALL 0E4D 



;Siai-FLA6-EIP UND EiP RETTEN 
jHACHKOBHASTELLEM * 1, WNN ■.■-FLA6 ' 
fO 1ST 6ESETZT (!)) 

IMACHKOWIASTELLEN IMD FLA6 RETTEN 

jPOINTER RETTEN 

jZIFFEfi LAKN 

i-'O' EREIBT NERT IN A 

i RETTEN 

;TrP TESTEN 

iSIHSLE, DOUBLE? --> SPRUN6 



M LADEN 

;>= 3277D? (D.H. lOD I 1 >= 32770D) 

;JA, IN SIHSLE UNNANDELN 
;ZAW. HAL lOD: ZAHL NACH HL 

iZAa t 4 

J ZAHL t 5 
iZAHL t lOD 
; ZIFFER ZWmECI! 
;NACH fiC (6 1ST 0) 
;UND AUf ZAHL MDIEREN 
;NfltE ZflHL > 32747D? 

;JA, IN SIN6LE UttUflHDELN 
jttEUE ZAHL NACH i 
iPOINTER ZUfiUECK 

jNACHKOBHflSTELLEN UND FLAG ZURUECK 
;El(P-SI6N-fLfl6 UND EIP ZURUECK 
iNfltCHSTES ZEICHEN 
{ZIFFER RETTEN 

;HL (OHNE SI6N) IN SIN8LE iftWANDELN 
jKAECHSTEN 5PRUN6 I»4DRIEREN 
i DOUBLE? "> SPRUN6 



K,9474 iKONSTANTE 1E6 NACH Y 

DE,2400 

OAOC jZflHL >= 1E4? 

P,OF74 iJA, IN DOUBLE UHUANDELN 

093E jZAHL HAL lOD 

Af J ZIFFER ZURUECK 

0Fe9 ;1MD AUFADDIEREN 

0F51 ;I(EIT£R 



jZANL IN DOUBLE URHNDaR 
;ZAHL t lOD 
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0F7fl CD FC 09 


CALL 


09Fr 


0F7IF1 


POP 


AF 


CFTE CB 64 09 


CALL 


09M 


0F81 CD E3 OA 


CALL 


oaf;^ 


0FS4 CB 77 OC 


CALL 


OC77 


OFS? la C8 


JR 


0F51 



IZAHL NACH Y 
(ZIFFER ZURUECK 
;NACH i ALS SIHLE 
! IN BOUGLE IMUAHBELH 
|UND AlFABDIEREN 
jKITER 



UP SADDA (AF.tC.DE.HL) 

SUARE BILDEH 

IiI'SWHAW 
A^^SIMMNO (SIGNEB B-BIT- INTEGER I 

DiX^SUfVE 

0F89 CD A4 09 CALL 09A4 ;l.SUNt1AND AUF STACK RETTEN 

0F3C CB M 09 CALL 0964 ;2.^l1flAND ALS SINGLE UUi I 

OFSF Ct POP BC il.SUrWAHB ZURUECK 

aF90 Bl POP BE ;NACH Y 

0F91 C3 16 07 JP 0716 ;SUHN£ BILDEK 

EIPONENTENZIFFER VERARBEITEN 

tf94 7B LB A.E jEIP >-9? 

0F95 FE Ofl CP OA 

0F97 30 09 JR NC,CfA2 )JA. UEBERLAUF EfiZEU6EH 

0F99 07 RLCA iElP t lOS 

0F9A 07 RLCA 

4F9B 83 ADD E 

0F9C 07 RLCA 

0F9B S6 ADD (HL) ;ZEICHEH AD6IEREN 

0F9E B6 30 SUB 30 j'O' ABZIEHEN 

OFAO SF LB E,A ;NEUER EIP 

OFAl FA IE 32 JP H,321E ;HIRD HIE MSBEFUEHRT 

(0FA2 IE 32 LD E,32 ;E)(P = 32, RUFT UEBEBLAUF HERVOR) 

0FA4 C3 BD OE JP OEBB ;HAE[:NSTE ZIFFER 

UP PRZNRl (AF.BC.DE.HL) 

' IN ' ZEILENNUHHEft AUS6EBEN 

hHL'ZEILENHUnnER 

D:/ 

HL ;ZNR RETTEN 

HL,192I fZEIBER AUF TEIT ■ IN ' 

2aA7 i> IN ' AUS6EIEN 

HL jZIIR ZURUECt 

UP PRZNR (AF.BC.DE.HL) 

ZEILENNURHER AUS6EBEK 

I;HL=ZEILENNUKnER 

01/ 

0A9A )AL8 INTESER NACH I 

A ;F(»)nATFLA6 LDESCHEN 

1034 jABSPEICHERN UND BUFFER INITIALISIEREN 

(HL) ;I ALS 1NTE6ER DHNE (!) VORZEICHEN 

0FB9 ilN 5TRIN6 UONANBELN 

2&A6 ;UND DIE5EN AUSBRUCKEN 

UP USTfi (Af,BC,DE,HL) 

NANDELT ZAHL IN IMFORHATIERTEH STRING UN 
I:I=ZA»H. 

0:(HL)..=STRIHe HIT ABGESCHLDSSEN 
OFBB AF lOR A )FQRNATFLAB LOESCHEN 



0FA7E5 


PUSH 


OFAB 21 24 19 


LD 


OFAB CD A7 2B 


CALL 


OFAE El 


POP 



CFAF CD 9A OA 


CALL 


0FB2 AF 


IDR 


0FB3 CD 34 10 


CALL, 


0FB6 B6 


Effi 


Of B7 CD »9 OF 


CALL 


OFBA C3 A6 28 


JP 



UP 



FSTR (AF,BC,DE,HL1 

HAMDELT ZAHL IN FORMTIERTEN STRING UH 



OFBE CD 34 10 


CALL 


OFCl E6 08 


ANB 


0FC3 28 02 


JR 


0FC5 36 2B 


ID 


Of C7 EB 


EI 



I:1=ZAM. 
A=FDRNATFLAG: 
BITOiEIPONEHTENAUSGABE 
BITliH, V. 

BIT2!V0fiZEICHEN HINTER ZAHL 
BIT3;'+' AUCH DRUCKEN 
BIT4:'*' VOR ZAHL DRUCKEN 
IIT5iFUEHREHDE LEERRAEUHE HIT 't' AUSFUaLEN 
BIT6I',' AUSBEBEH 

IIT7iF0fmATIERUN8 UEBERHAUPT DURCHFUEIffiEN 
B'VORKfflMAFELDLAENBE l> ANZAHL DER VORKOttNASTELLEHI 
C^NACHKOmAFELDLAEN&E (> ANZAHL DER NACHKDHtttSTELlEN * 1 (FUER '.')) 
0:(HL1..=F0RIWTIERTER STRIHB HIT ABSESCHLOSSEN 

1034 ;BUFFERANFAN6 (4130) NACH HL, FDRHATFLAfi ABSPEICHERN 

OS i'f AUCH AUS6EBEN? (BIT 3 DES FORHATFLAGS 6ESETZT) 

Z,0FC7 gREIN 

(HLl,2fl ]•*• IN BUFFER 

DE.HL gBlH'FERZEIBER NACH DE 
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OFCB CD 94 09 
OFC! EB 
WCC F2 P Of 
»FCF 3i 2D 
mi C5 
0FD2 E5 
0FD3 CD 7B 09 
OFDi El 
0FD7 CI 
OFDfl B4 
0FD9 23 
OFDfl 34 30 
OfDC 3A QS 40 
OFW 57 
OfEO 17 
OFE] 3A Af 40 
0FE4 DA 9A 10 
0fE7 Cfl 92 10 
WEfl FE 04 
OFEE D2 3D 10 



OFEF 01 M 00 
0FF2 CD 2F 13 



0FF5 21 30 41 
0FF8 4i 
0FF9 OE 20 
OFFB U DS 40 
OFFE ^ 
OFFF E& 20 
1001 28 07 

1003 7B 

1004 B9 

1005 OE 2A 
1007 20 01 

1009 41 
iOWl 71 
1D0BD7 
lOOC 28 14 
lOOE FE 45 

1010 28 10 
1012 FE 44 
1014 28 OC 
lOli FE 30 
lOia 26 FO 
lOlfl FE 2C 
lOlC 28 EC 
lOlE FE 2£ 
1020 20 03 

1022 2B 

1023 3i 30 

1025 7B 

1026 Eb 10 
102S 28 03 
102A 2E 
102B 36 24 
I02D 7B 
102E U 04 

1030 CO 

1031 2B 

1032 70 

1033 C9 



1034 32 D8 40 
1037 21 JO 41 
103ft 36 20 
103C C9 



103D FE 05 
103f E5 
1040 SE 00 

1042 17 

1043 57 

1044 14 

1043 CD 01 12 



CALL 

EI 

JP 

LD 

PUSH 

PUSH 

CALL 

POP 

POP 

OR 

JKC 

LD 

LD 

LD 

RLA 

LD 

JP 

JP 

CP 

JP 



0994 


;ZAHL >' 0? 


DE.HL 
P,0FD9 


;BUFFERZEI6ER HCH HL 
jJA 


(HL),2D 


!'-' IN BUFFER 


BC 


;FELDPHAnETER RETTEH 


HL 


jBUfFERZEIBEIl RETTEN 


097B 


;VHZEICH£N EMTFERNEK 


HI 


jBUFPERZEISER ZUftUECK 


BC 


jFELDPARAHETER ZUftOECK 


H 


jNaLFLAB ZWUECKSETZEN 


HL 


;BUFFERZEI6ER IHC. 


(HL),30 


i'O' IN BUFFER 


A, (40DB) 


;F0f»ATFLA8 HACH D 


D,fl 






IFDRHAIIEWMG ERWtfWCHT? 


A,(40AF) 


;IYPK LADEN 


C,109A 


;Jfl 


2,1092 


{lAHL = 0? ~) SPRUHB 


04 


;EIH6LE ODER DOUBLE? 


KC,]030 


;Jfl - 



INTEEER IN STRING UtIUANDELN 

LD BC.OOOO iPARAHETEB FUER '.' UND ',' LOESCHEH (KEIN '.' UNB KEIH ',') 

CALL 132F ;BTRIN6 EfiZEUfiEN 

FORWTFLfifi BIT 2-5 VEfiftRBEITEH 



LD 

LD 

LD 

LD 

LD 

AND 

JR 

LD 

CP 

LD 

JR 

LD 

LD 

RST 

JR 

CP 

JR 

CP 

JR 

CP 

Jft 

CP 

JR 

CP 

JR 

DEC 

LD 

LD 

AND 

JR 

DEC 

LD 

LD 

AND 

RET 

DEC 

LD 

RET 



HL,4130 
B, (HL) 
C,20 
A,(40DB) 

Z.IDOA 

t' 

C.2A 

nI.iooa 

B.b 

(W.1,C 

10 

Z,1022 

45 

Z,lt)22 

44 

Z, 1022 

30 

Z,100fl 

2C 

Z.IOOA 

2^ 

NZ,102S 

HL 

(HL),30 

fi^ 

Z,102D 

W. 

(HL),24 

A,E 

04 

NZ 

HL 

(HL),B 



;BUFFERZEI6ER AUF BUFFERANFANfi 

iVQRZEICHEN AUS BUFFER LADEN 

;5PACE HACH FILLCHM 

jFORflATFLAG LAOEK 

I HACH E 

IHIT 't' AUSFUELLEN? (BIT 5 VON FLA6 KSETZT) 

'HEIN 

jVORZEICHEN = SPACE? 

jFILLCHAR » T 

|KIN 

jyORZEICHEH = FILLCHAR 

;FILLCHAR IN BUFFER 

;NAECHSTES ZEICHEN, ZEILENENSE? 

iJA, NICHT KEITEB I^UELLEN 

;= BireLEEIPKEWUNG? 



iJA, HICHT HEITER FUELLEN 
I' DOUBLEElPKEHNlMe? 



;JA, NICHT KITES FOELLEN 

;Jfi, NEilERFUELLEN 
■ = ' '"} 

j'jA 'meiterfuellen 
j=\'? 

iWIN, NICHT KITER FUELLEN 

IVOR \- 'E' UND ^D' EINE NULL EINFUE6EN: BUFFERZEI6ER DEC. 

i'O' IN BlffFER 

; DOLLAR VOR ZAHL7 

; (BIT 4 VON FORHATFLAG 6ESETZT} 

;NEIN 

;BUFFERZE18ER ZURUECK 

i't' IN WFFER 

)VOflZEICH£N HINTER ZAHL7 

J (BIT 2 VON FORNATFLAB GESETITt 

;Jfl, FERTIS 

iWJFFERZEISER VOR ZAHL 

(VOfiZElClfEN IN BUFFER 



BUFFER INITIALISIEREH UND FMNATFLAG ABSPEICtffiN 

LD (40D8),A ifORHflTFLAB AflSPEICHERN 

LD HL,4130 iBUfFERANFftW NACH HL 

LD (HL),20 jSPflCE ALS l.ZEICffiN IN BUFFER 



SINGLE UND DOUBLE IN STRING URNAHDELN (IMFORHATIERT) 



CP 

PUSH 

SBC 

RLA 

LD 

INC 

CALL 



05 
HL 
00 

r 

1201 



IBEHAUIGKEIT FUER SINGLE UND DOUBLE ERHITTELN: SINGLE? -> CY»1 
;»UFFERZEIGER RETTEN 

I'l 2 ER6IBT GEHAUIGKEIT (SINGLE > b, BffiJBLE > 16D STELUN) 

gGENAUIGKEIT NACH D 

iSENAUIGKEIT * 1 

jlO-EIPONENT ERHITTELHi AMO-EIP - GENflUlGKEIT (i,16D] ♦ 1 
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1048 01 00 03 
!04B 82 
I04C Ffi 57 10 
10*F 14 
105D BA 
I 051 30 04 

1053 3C 

1054 47 

1055 3E 02 
1057 D& 02 
1059 El 
105A F5 

105F a 91 12 
105£ 36 30 
1C40 CC C9 09 
1063 CD A4 12 
lOU 2B 
1067 7E 
im FE 30 
lOU 28 FA 
106C FE 2E 
106E C4 C9 09 

1071 Fl 

1072 28 IF 

1074 F5 

1075 E7 

1076 3£ 22 

1078 ef 

1079 77 
107fl 23 
1076 Fl 
107C 36 2B 
107E F2 B5 !0 
lOei 36 2D 

1083 2F 

1084 3C 

1085 06 2F 

1087 04 

1088 D6 Ofl 
lOSA 30 FB 
IMC C6 3A 
108E 23 
108F 70 

1090 23 

1091 77 

1092 23 

1093 36 00 
1095 EB 

1094 21 30 41 
1099 C9 



109fl 23 
109B C5 
109C FE 04 
109E 7A 
109F D2 09 11 



10fi2 IF 
!0A3 DA A3 11 
10A6 01 03 06 
10A9 CB 89 12 
lOAC Dl 
lOAD 7fi 
lOAE D6 05 
lOBO F4 69 12 
!0B3 CD 2F 13 

loes 7B 

i0B7 87 
mS CC 2F 09 
lOBB 3D 
lOfiC F4 69 12 
lOBF E5 



lOCO CD F5 OF 
10C3 El 
10C4 28 02 



LD 

ADD 

JP 

IttC 

CP 

JR 

INC 

LD 

LD 

SUB 

POP 

PUSH 

CALL 

LD 

CALL 

CALL 

SEC 

LD 

CP 

Jfl 

CP 

CALL 

POP 

JR 

PUSH 

RST 

LD 

ADC 

LD 

INC 

POP 

LD 

JP 

LD 

CPL 

INC 

LD 

INC 

SUB 

JR 

ADD 

INC 

LD 

IKC 

LD 

IHC 

LD 

EI 

LD 

RET 



BC.OMO iPARAHETER FUER '.' UND ',' SET2EN: ',' MCH DER l.IIFFEIt, KEIN ' ' 

D ilO-EKP + 2 >' 07 (ZAW. >« lE-2) 

H,10S7 illEIN, 10-EIP IN lUFFEfi 

D ;6EMIjI6KEIT + 2 HACH D 

D ;10-EIP < BENAUIBCEIT? 

NC,1057 jNEIN, 10-EIP IN BUFFER 

A jjfl, lo-ElP ♦ 3 ERfilBT DEZIHflLPlMTSTELLE 

B,fl 

A,02 ;UND ES HIDO KEIH EIPDKENT SEDRUECKT, DAHER lO-EKP *2'2 

02 ; 10-EIP NKHfl 

HL ;BIFFERZEIB£R ZUniECIi 

AF ;10-£HP RETTEN 

1291 i'.* UMD ' ' SETZEd 

(HL),30 j'O' IN BUFFER 

Z,09C9 ;'.' KSET7T? IBEI lO-EXP = -2) --> BUFFEHZEIfiER IK. 

12A4 jNANTISSE IN STRING UMRDELN 

HL ;BUFFERZEI6ER DEC. 

A,(HL) iZEICHEN LADEN 

30 ;= 'O'? 

Z,1066 ;JA, HEIIER 

2E ;VM LETZTER NULL '.'? 

NZ,0?C9 ;NEIN, BtiFFERIEIGEft INC. ('.' HIRD BESTRIQCNI 

6F J 10-EIP lURUECi:, =0? 

1,1093 ;Jfl, KEIN 10-EXP IN BUFFER 

tf i 10-EIP RETTEN 

20 jTYP TESTEN: SIN6LE? -> CY=1 

A, 22 !'0'/2 NACH EXPKERKUHe 

A jElPKEItNUNS < 'E' FUER SlKLl UND 'D' FUER DOUBLE 

(lfi.),A lEXPKENMlNG IN BUFFER 

HL jBUFFERIElffiR INC. 

AF ; 10-EIP ZURUECK, < 0'' 

IHL),2B ■'*' IN BUFFER 

P,10S5 ;N£IN 

(HL),2D j'-' IN BUFFEB 

;UND VDRZEICHEN ENTFERNEN 

B,2F ;IIFF£fi = '0' - 1 

B iZIFFER = ZIFFER * 1 

OA ; 10-EIP - lOD NACH 10-EIP, UNTEftLAUF? 

NC,10e7 ;NEIN, KITER 

3A ;LETZTE SUBTRAt;TION RUECK6AEH6I6 UND ABDITDN VON '0' ERSIIT 2.Z1FFER 

HL iBUFFERZEISER INC. 

(HL),B ;1. ZIFFER IN BtfFER 

HL jMfFERIEIffiR INC. 

(HL},A ;2. ZIFFER IN BUFFER 

HL ;BUFFERZEI6ER IKC. 

(HL),00 jZEILENENDE 

DE.hI iZEILENENDEZEIBER NACH DE 

HL,4130 ;BUFFERANFANG NACH HL 



FORHATIERTEN STRING ERZEUGEN 
INC HL jBUFFERZEIGER INC. 

PUSH BC jFELDPflftAHETEH RETTEN 

CP 04 {SINGLE ODER DOUBLE? 

LD A.D :FORHATFLAG NACH A 

JP NC,1109 ;Jfl 



INTEGER 
RRA 

JP C,11A3 

LD BC,0603 

CALL 12B9 

POP DE 

LD A.D 

SUB 05 

CALL P,1269 

CALL 132F 

LD A,E 

OR A 

CALL Z,092F 

E^C A 

CALL P,i269 

PUSH hL 



;10-ElP-ftUS6ABE? (BIT VON FORMTFLAG SESETZT) 

iJA 

iPflflAHEIER FUER '.' UND ' ', '.' NACH DER 5.STELLE, ',' NACH DER 2. 

;KE1NE '.'-AUSfiABE ERHUENSCHT? -> PARARETER FUER \' LOESCHEH 

;FELDPARAHET£R ZURUECK NACH M 

iVOftKOHHASTELLEN - 5 (NORIIALE ANZAHL DER ZIFFERN ffil INTE6ER) >= 0? 

;ENTSPRECHENDE ANZAHL MULLEN AUSGEIEN 
;ZAHL IN STRING UNNANDELN 
iKEiNE NACHKOHHASTELLEN? 

)JA, '.' AUS BUFFER ENTFERNEN 
SNACHKOnnAFaOLAENGE NACH A, - 1, > 0? 
iENTSPRECHENDE ANZAHL NULLEN AUSGEIEN 
;BUFFERZE]e£R RETTEN 



UEBRIGE FORNATIERUNG, RICHTI6E FELDLAEN6E HERSTELLEN 

CALL 0FF5 jUEBRlBE FORMTVCRSCHRIFTEN ERLEDIGEN, VDRZEICHEN HINTER ZA1«.7 

POP HI iBUFFERZEISER ZUR1£CK 

JR Z.IOCB ;KEIN 
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10C6 70 
10C7 23 
10C8 U 00 
lOU 21 :F 41 
lOCD 23 
lOCE 3fl F3 40 
lODl 95 

1002 n 



10D3 C8 
1(»4 7E 
IOCS FE 
1007 26 
lOM F£ 
10DI2B 
lOSD 2t 
1»E E5 
lOM F5 

loeo 01 

lOE! C5 
10e4 D7 
10E5 F£ 

10E7 ce 

lOEflFE 
ICCA C8 
lOEl FE 

loes CB 

lOFE CI 
lOEFFE 
Iff I 24 
lOf! 23 
1W4 D7 
lOFS 30 
10F7 2B 
lOFB 01 
(10F9 
(lOFfl 
lOFI Fl 
lOfC 28 
lOFE CI 
lOFF C3 



DF 10 

2D 
2B 
24 



OB 

2fl 77 
21 

77 

FB 
CE 10 



1102 Fl 

1103 28 FD 
UOS Et 
im 3i 2S 
110SC9 



tlOf E5 
UOA IF 
HOB DA AA 11 
llOE 26 14 
1110 11 84 13 
1113 CD 49 OA 
llli U 10 
ins FA 32 11 



lllB El 
lllC CI 
lllB CD 

1120 2B 

1121 3i 

1123 C9 

1124 01 
1127 II 
112A CD 
112D F2 
1130 lb 
1132 CD 
1135 C4 

1138 El 

1139 CI 
113A FA 



BD OF 

25 

OE lb 
CA IB 
CC OA 
IB 11 
06 

35 09 
01 12 



LD 

IK 

LD 

LD 

INC 

LD 

SUB 

SUB 

RET 

Lfi 

CP 

JR 

CP 

JR 

DEC 

PUSH 

PUSH 

LD 

PUSH 

RST 

CP 

RET 

CP 

RET 

CP 

RET 

POP 

CP 

w 

IMC 
RST 

JR 

DEC 

LD 

DEC 

LD 

POP 

JR 

POP 

JP 



fHL),B 

HL 

IHL),00 

HL,412F 

HL 

A,(40F3) 

L 

D 

Z 

A,(HL) 

20 

I.IOCD 

2A 

Z.IOCD 

HL 

HL 

AF 

BC.IODF 

BC 

10 

2D 

Z 

2B 

Z 

24 

1 

BC 

30 

HI,im 

HL 

10 

NC,1102 

m. 

BC,7726 

HL 

(HL),A 

W 

Z,10F9 

BC 

lOCE 



VORZEICHEN HINTEfi ZAHL 
BUFFERZEI&ER IK, 
ZEILENEHDE HIT HARKIEREN 
BUFFERZEI6ER AUF BYTE VQR BUFFERANFANG 
BUFFERZEI&ER IK, 
LSB '.'-POSITIDH 

- LSB BUFFERZEI6ER 

- VDRKOHMFELDLAEHBE = 0? 
(RICHTI6E VORKONMAFELDLAENfiF ERREICHT) 
J A, FERTI6 

lElCHEH LADEN 
= ' "} 

JA, ffilTER 
= H'? 
J A, HE ITER 
#FERZEIGEft DEC, 
I'UHD RETTEN 

FLfl6 IZ'Ol RETTEN ODER lEICHEN IfflD Z=l 
RUECKSPRUNfiADRESSE SET2EN (NAECHSTES ZEICI^tl) 

{NAECHSTSES ZEICKEN 
t« ■-'? 
IJA, KITER 

.'»'■> 

JA, HEITER 

= U' 

JA, KITER 
RUECKSPRUWADRESSE ENTFERNEN 

- '0'? 

KEIM, FELDUEBERLAUF 
BUFFERZEI6ER INC. T.' UEBERKKH) 
NAECHSTES ZEICHEN, ZIFFER? 
MEIN, FELDUEBERLAUF 
BUFFERZEIfiEfl AUF '.' 

KJFFERIEI6ER DEC! 
gZEICHEN IK BUFFER) 

] ZEICHEN VDR STACK ZUniECI^, LETZTES lEICHEN? 
;NEIN, HEITER 

;BUFFERZEieER VM STACK ENTFERKK 
; HEITER 



FELDUEBERLAUF 
POP AF 



JR 
POP 
LD 
RET 



Z,I102 

HL 

(HL),25 



i ZEICHEN Wn STACK EHTFERHEN, LETZTES ZEICHEN? 

;KIH. HEITER 

;BUFF6RZEI6ER ZURUECK 

I'l' FUER FELDUEBERLAUF VOfi ZAHL 



FORIIATIERTEN STRIH6 ERZEUGEH (SINGLE UNO DOUBLE) 



PUSH 

RRA 

JP 

JR 

LD 

CALL 

LD 

JP 



HL 

C.llAA 

Z,1124 

5e,1384 

0A49 

D,10 

H,l]32 



;BUFFERZEIGER RETTEN 
jEIPONENTENAUSBABE ERHUENSCHT7 
IJA 

SIH5LE? --> SPRUNG 

ZEI6ER AUF KONSTANTE 1D14 

ZAHL >= 1D16? 

6ENAU16XEIT lUD STELLEN FUER DOUBLE) NACH D 

HEIN 



FELDUEKRLAUF 
POP HL 



57 U 



POP 

CALL 

DEC 

LD 

RET 

LD 

LD 

CALL 

JP 

LD 

CALL 

CH.L 

POP 

POP 

JP 



BC 

OFBD 
HL 
(HL),25 

BC,B60E 

DE.IBCA 

OAOC 

P.lllB 

D.Oi 

0955 

«,1201 

HL 

BC 

H,1157 



(BUFFEHZEIffiR ZURUECK 

iFELDPARAKTER ZURUECK 

UNFORNATIERTEN STR1N6 ERZEU6EN 
,BUFFERZEI6ER DAVOR 
i'Z' FUER FELDUEBERLAUF Wfi STRING 

jSINSLE: 1 = lEi 

(ZAHL >' lEi? 

jJA, FELDIKBERLAUF 

;GENA1)I6KEIT (6 STELLEN FUER 5IN6LE) NACH D 

;ZAHL ' 0? 

iNElN, lO-EKP - GENAUIGKEIT t 1 NACH fl 

;BUFFERZ£IGEfl ZURUECK 

;FELDPMAnETER ZURUECK 

;NACHKONHASTELLEN VORHAWEN? -> SPRUNG 



L13D C5 



KEINE NACHKOnflASTELLEN VORHANDEN 

PIB« Bt [FELDPfiRAHETER RETTEN 
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IlJE 5F 

U3F 78 

lltO 92 

1141 93 

1147 H 69 12 

1145 CD 7D 12 

114S U A4 12 

1141 B3 

114C C4 77 12 

114F B3 

1150 C4 91 12 

1153 DI 

1154 C3 Si 10 



1157 5F 

iisa 79 

1159 B7 

USA C4 16 OF 

USD 83 

UK FA 62 11 

1161 AF 

1162 CS 

1163 F5 

1164 FC IB OF 
1167 FA 64 11 
116A CI 

I16B n 
116C 90 
IIU CI 
llhl 3F 
Utf U 

1170 78 

1171 FA 7F 11 

1174 92 

1175 93 

1176 F4 69 12 
1179 C5 

117A CD 7D 12 
117D 18 11 



IITF CD 69 12 
1132 79 
1183 CD 94 12 
1136 4F 
11S7 AF 
IIH 92 

1189 93 

118A CD 69 12 
118D C5 
USE 47 
118F 4F 

1190 CD fl4 12 

1193 CI 

1194 61 

1195 20 03 
1197 2A F3 40 
119A 83 

119B 3D 
119C F4 69 12 
n9F 50 
llAO C3 BF 10 



tlA3 E5 
11A4 DS 
11A5 CD CC DA 
11A8 Dl 
11A9 AF 



UAA CA BO II 
HAD IE 10 
UAF 01 IE 06 
(IISO IE 06 
11»2 CD 55 09 



LD 


E,A j 


LD 


A,B ; 


SUB 


D ; 


SUB 


E ! 


CALL 


P,1269 i 
127D i 


CALL 


CALL 


12A4 ; 


OR 


E ; 


CALL 


HZ, 1277 i 


DK 


E 


CALL 


NI,1291 ; 


POP 


DE 


JP 


tOB6 ; 



nachkohhastellen 



LO 

LD 

OR 

CALL 

ADD 

JP 

KM 

PUSH 

PUSH 

CALL 

JP 

POP 

LD 

SUB 

PDP 

LD 

ADD 

LB 

JP 

SUB 

SUB 

CALL 

PUSH 

CALL 

Jit 



E,A 

A,C 

NZ,0F16 

H,lt62 

A 

BC 

AF 

n.oFia 

fl,l]64 

Bt 

A,E 

B 

BC 

!■• 

A,l 
H,117F 

D 
E 

P,1269 
BC 
1270 
119D 



10-eiP - SENAUIBKEIT * 1 NACH E 

VDRXOmAFaDLAEHeE 

- 10-EIP - 1 ((ACH A 

>= 0? 

JA, ENTSPRECHEHE AK7AHL HULLEII IN BUFFER 

PAfiAKTER FUER '.' UM ',' ERfllTTELH 

STRIHS EftZEUSEN 

10-EKP - BEMAUIGKEIT * 1 > 0? 

JA, EHTSPRECHENDE AHZAtl NULLEN HIT ('.■ UND ■/) IH BUFFER 

10-ElP - SEKAUISKEIT + 1 > 0? 

ja, '.' uhd ',' in buffer 
feli^araheter hach de zurueck 
uebri6e forhatieruhg durchfuehren 

vdrhanden 

ilO-£)lP - 8EMAUIGKEIT * 1 HACH £ 

|NACKKEHU1AFELDLAEN6E NACH A 

i> 0? 

jJA, - 1 (FUEB '.') 

|8RDE55ER ALS VDRHANDEHE MACHKMHASTELLEN 

;NEIN 

iNEIN, ANZAHL OER UEBERFLUESSIBEJi STELLEH = 

jFELDPARAKTER RETTEN 

;-ANZAHL KR UEBERFLUESSI6EN STELLEN RETTEtt 

}ENTFER«H: ZAHL / lOD, ANZAHL + 1 

i< 0? --> HEITER 

;-AKZAHL DER UEBERFLUESSIEEN STELLEN ZURUECK 

l-ANZAH MR TATSAECHLICH AUSZUGEBEHDEN NACHKOHMASTELLEN MACH A 

FELDPflfiABETEft ZURUECK 
NACH E 

* 6ENAUI6KEIT < 07 (NUR NACHKOHRASTELLEN) 
VORKOHMFELDLAENSE NACH A 
JA 
VORKOmAFELOLAENSE - BEHAUiSKEiT 

* TAT^CHLICH AU5ZU6EBENDE NACHKOHHASTELLEN, > 0? 
ENTSPRECHENDE AMZAHL NULLEN IN BUFFER 
FELDPARAHTER RETTEN 
PARAMETER FUER '.' UHD ■,' ERHITTELN 
HEITER 



NUR NACHKDflNASTELLEN 
CALL 1269 

1^94 

S'' 

D 

E 

1269 

BC 

B,A 

C.A 

12A4 

BC 

C 

NZ,U9A 

HL,(40F3) 



LD 

CALL 

LD 

lOR 

SUB 

SUB 

CALL 

PUSH 

LD 

LD 

CALL 

POP 

OR 

JH 

LD 

ADD 



DEC 
CALL 
LD 
JP 



A 
P,1269 

l^BF 



FUER VORKOflNAFELDLf^NGE NULLEN IN BUFFER 

NACHKDHHAFELDLAENSE NACH A 
, - ' IN BUFFER 
jMCHKDHNAFELDLAENSE NACH C 

TATSAECHLICH AUSZUSEBEHDE NACHKOflHAST ELLEN - 

GENAUI8KEIT 

ER6IBT ANZAHL I£R EINZUFUEGENDEN NULLEN 

NULLEN IN BUFFER 

FELDPARANETER RETTEN 

PARAHETEfi FUER'.' UND ',' LOESCHEN 

IKEIN '.' UHD KEIN ',') 
.STRING IH BUFFER 
jFELDPARAttETER ZURUECK 

NACHKONNAFELIU.AENGE > 0? 

JA 

'.'-POSITION LADEN 

HACHKOflBAFELDLAEHfiE - ANZAHL DER TATSAECHLICHEN AUSBESENEN 

NACHKDtlNASTELLEN 

- 1 (FUER ' . ' ) 

> 0? ~> entsprechende ahzahl nullen ausgebeh 
vorkdhhafeldlaeh&e nach d 

HITER 



FORNATIERTE EIPMNTEHAUSGABE 

ANSPRUNG INTESER 

PUSH HL 

PUSH DE 

CALL OACe 

PDP DE 

lOR A 



BUFFERZEIKR RETTEN 
FORHATFLAG RETTEH 
INTESER IN Smil UNHANDELN 
FORHATFLAG ZURUECK 
FLAG FUER SIttBLE SETZEN 



ANSPRtMB SINGLE/DOUBLE 



JP 
LD 
LD 
LD 
CALL 



Z.llBO 

£.10 

BC.OtlE 

£.06 

0955 



jSINGLE? --> SPRUNG 

jDOUBLE: GENAUIGKEIT = 16D STELLEN 

ISINBLE: GENAUIBKEIT = 6 STELLEN) 
jZAHL = 0? 

SEITE 49 



11B3 37 


SCF 




Hit C4 01 12 


CALL 


NZ,1201 


lllf El 


POP 


HL 


UU CI 


POP 


EC 


IIBI F5 


PUSH 


AF 


UK Ti 


LD 


A,C 


UBB 17 


OR 


A 


IIM F3 


PUSH 


AF 


IIBF C4 UOF 


CALL 


NZ,OFU 


11C2 eo 


ADD 


fl 


11C3 4F 


LD 


C,A 


11C4 7A 


LD 


AD 


lies Ei 04 


AMD 


04 


11C7 FE 01 


CP 


01 


11C9 9F 


SBC 


A 


11» S7 


LD 


D,A 


UCI 81 


ADD 


C 


UCC 4F 


LD 


C.A 


11» 93 


StiB 


E 


MCE FS 


PUSH 


AF 


IICF C5 


PUSH 


BC 


llIKi FC IS OF 


CALL 


H.OFIB 


11D3 FA DO 11 


JP 


n.UDO 
Bt 


llOi CI 


POP 


1167 Fl 


POP 


AF 


11D8 CS 


PUSH 


BC 


11D9 F5 


PUSH 


AF 


11E)A FA CE 11 


JP 


n,llE)E 


im AF 


lOR 


A 


UK 2F 


CPL 




IIDF 3C 


INC 


A 


llEO 80 


ADD 


B 


llEl 3C 


INC 


A 


UE2 82 


ADC 


D 


11E3 47 


LD 


B,* 


I1E4 OE 00 


LD 


CjOO 
12A4 


11E6 CD A4 12 


CALL 


11E9 Fl 


POP 


AF 


llEA F4 71 12 


CALL 


P,1271 
BC 


UED CI 


POP 


!1EE Fl 


POP 


AF 


HEF CC 2F 09 


CALL 


I,092F 
AF 


11F2 Fl 


POP 


UFI » 03 


JR 


CUFe 


IIFS 83 


ADD 


E 


I IF* 90 


SUB 


B 


11F7 92 


SUB 


D 


11F8 CS 


PUSH 


BC 


11F9 CD 74 10 


CALL 


1074 


IIFC EB 


£1 


DE.HL 


UFS Dl 


POP 


DE 


UFE CJ IF 10 


JP 


lOBF 




lAHL S01AK6E NIT lOD 




6EHAU 


b r) am M 


1201 M 


PUSH 


OE 


1202 A& 

1203 F5 


m 


A 


PUSH 


AF 


1204 E7 


ftST 


20 


120S E2 22 12 


JP 


P0,12;2 


1208 3A 24 41 


LD 


A,;il24! 
91 


1201 FE 91 


CP 


120D 02 22 12 


JP 


HE, 1222 


1210 11 64 13 


LD 


DE,1364 


121! 21 27 41 


LD 


HL.4127 
09D3 


12U CD D3 09 


CALL 


1219 CB Al 00 


CALL 


ODAl 


12tC Fl 


POP 


AF 


I21B Di OA 


SUB 


OA ■ 


121F F5 


PUSH 


AF 


1220 18 U 


JR 


1206 


1222 CD 4F 12 


CALL 


124F 


1225 E7 


fiST 


20 


1226 30 OB 


JR 


K.i233 


1228 01 43 91 


LD 


BC,9143 


1221 11 f9 4F 


LD 


DE.4FF9 
OAOC 


122E CD OC OA 


CALL 


1231 18 06 


JR 


1239 


1233 11 6C 13 


LD 


DE,136C 



;JA, FLAG CT SETZEN 

;REIN, 10-EIP - KltAUlSKElT * 1 ERHITTELH (CI lXStHH) 

•,immiiwt lumjEcx 

;FELDPWAHETEft ZUAttECK 

|10-£](P - BEHAUIBK. * 1, FLAS RETTEN 

;ltACHKOmAFELIH.AE)fSE > 0? 

;ttACHK0MIAFELDLAEH6E RETTEN (FtlER '.') 
jHElN. MCHKOmUFELDLAEHSE - 1 
tVORKOHlAFELDLAEHU AODIEREN 
18ESANTFELDUKKE MCM C 
;F0ftnATFLA6 TESTEK 

jBIT 2 BESETZT7 (VORZEICHER HIHTER ZAHL) 
)JA, NACH FORHATFlAe 
jSONST - 1 

;8ESAnTFELDLAE)t6E - 1, tfEMI VORZEICHEH NICHT HINTEP lAHL 

'NACH C 

J- lO-EiP - SENAUI&tEIT ♦ 1 ER6IBT 

!- AKZAHL DER )(E8ZURUMEKKH STELLEN, RETTEN 

jFELSPARAHETER RETTEN 

I- AN2AHL < 0? -> lAHL / lOD, - ANIAHL ♦ L £ 0? 

|Jfl, MElIEft 

{FELDPARAtlETER ZURUECK 

f- ANIML OER UEGZURUMDENDEN STELLEN lURUECK 

;P£LDPARAn£TER DETTEH 

I- WZAHL DER KBIbRUNDEUEN STELLEN RETTEN, KEIK STELLEN NESZURlltlL€N7 

iNElll 

i* 

;POSITIVE ftdlAHL ERHITTELH 

i+ VORKOttHAFELDLAENSE 
i* 1 

iUND - 1, NEM yofiZEiCHE»i m mi 

iERSiBT '/-STELLUN6 

jPARAHETEP FUER ',' » tCEIN '.'i 

jSTRING IN BUFFER 

;6£SAHTFELDLA£lt6E - BENAUI&KEIT > 0^ 

jJA, ENTSPRECHEKDE ASZAHL MiLEN IN BUFFER 

jFELDPAfiAKTER Zl^HlECK 

; NACHKOflnAFELDLAENSE > 07 

|JA, '.' AUS BUFFER ENTFERNEN 

ilML « 0? 

;JA 

;AUSZU6E6EN[IEK lO-EKP ERAITTELN 



iFELDPflftANETEfi RETTEN 
;UND 10-ElP IN fltlFFER 
;IUFFERENDE NACH HL 
;FELDPAAAflETER MAfH OE m\Att 
IKE ITER 



iV STELLEN 
;DE RETTEN 
;V£RSCHIEBUWEN > 
jVERSCHlEBUNSEN RETTEN 
ITTP TESTEN, SIWLE^ 
SJA 

\2-ll? mi >« 1707 
{(ZAHL » 65S36D) 

;JA 

;ZEI6ER AUF KMSTANTE IDIO 

jIEIBER AUF Y 

tlDlO NACH Y 

;ZAHL m. IDIO 

;VER3CHIEBUN6EN ZURUECK 

!- lOD 

jUND NIEDER RETTEN 

;HEITER 

;ZAHL >' \16 (') ODER IBU «l)7 --> NACH 1243 

jTVP TESTEN, DOUBLE? 

;JA 

IKONSTANTE lOOOMD HACH Y 

iZAHL >' 100000D7 

itflTER 

;ZEI6£R AUF KONETANTE IDIS 

SEITE 50 



12J4 CO <9 Oft 


CALL 


!239 F2 4B 12 


JP 


12JC Fl 


POP 


I2SS CD OB OF 


CALL 


1240 F5 


PUSH 


1241 IS E2 


JR 


1243 Fi 


POP 


1244 CD 18 OF 


CM.L 


1247 F5 


PUSH 


1246 CD 4F 12 


CALL 


1241 Fl 


POP 


124t B7 


DA 


124D Dl 


POP 


124E C9 


RET 


124F E7 


RST 


1250 Eft SE 12 


JP 


125J 01 74 94 


LD 


12» 11 F8 23 


LD 


1259 CD OC OA 


CALL 


12SC 18 Ob 


JR 


125E 11 74 13 


LD 


m\ CD 49 OA 


CALL 


1264 El 


POP 


12i5 F2 43 12 


JP 


126B E9 


JP 



OAA? ilAHL >' 1D15? 

P,124B ;JA 

AF ;VERSCHIEBtMKN ZURUECK 

OFOB jZAtl / lOD, UERSCHlEBtWfiEH INC. 

AF ;VEfiSCHIEBlttBEtl RETTEN 

1225 iNEITER 

AF jVEftSCHIEBUNSEN ZLIRUECK 

0F18 \imL I lOD, VERSCHIEBUN6ER - 1 

AF |VERSCHIEBUN6EK RETTEN 

124F ;»HL >= lib (!) OBER IDU <•)? --) MCH 1243 

AF ;VERSCHIEBUH8£H ZUflllECK 

A ;VERSCHIEIUM6EN TESTEN 

DE ;SE ZltRUECK 

20 iim. >= 1E6 I!) ODER 1D16 (D?) TYP TESTEN, DOUBU? 

PE,12X ;JA 

BC,9474 iKONSTANTE lEi NACH ¥ 

D£,23FB 

OAOC jIAHL >' 1E6? 

12&4 :lt£ITER 

!)E,1374 ;ZE16£R AUF KONSTAHTE 1D16 

OA49 ;IAHL >= 1D16? 

HL ;RUECK5PRUN6ADRESSE NACH HL 

P,I243 ;JA, NACH 1243 

(HL) ;KEiN, ttORHALER RUECKSPRUNB 



UP FILLO (AF=0044,HL) 



12i9 B7 
12iA CB 
126B 3D 
\2bC 36 30 
12&E 23 
12tf 18 F9 



NULLEN IN BUFFER EINSCHf^IBEN 
IiA-ANZAHL DER NULLEN 

HL=BUFFERZEI6£R 
Q:NL=BUFFERZEIGER m ANZAHL DER NULLEN ERHOEHT 



OR 

RET 

DEC 

LD 

INC 

JR 



A 

Z 

A 

(HL),30 

HL 

I2U 



;AHZAHL - 0? 
;JA, FERTIB 
; ANZAHL - 1 
i'O' IN BUFFER 
;BUFFERZEIBER ING. 
jKEITER 





NULLEN IN BUFFER NIT 


'.' UND ',' 


1271 20 04 


JR 


NZ,1277 


iANZAHL } 0? --> SPRUM6 


1273 CB 


RET 


I 


i' 0? --> FERTIB 


1274 CD 91 12 


CALL 


1291 


;'.' Um ',' BETZEN 
i'O' IN lUFFER 


1277 36 30 


LD 


(HL),30 


1279 23 


INC 


HL 


iBUFFERZEIBER INC. 


127A 3D 


DEC 


A 


; ANZAHL DEC. 


127B 18 fb 


JR 


1273 


;I)EITER 




PARAMETER FUER ■.■ UND '.■ ERBITTELN 


127D 7B 


LD 


A,E 


iVERSCHIEBUMEN MCH A 


127E 82 


ADD 


D 


jBEHAUIBKEIT ADDIEREN 


127F 3C 


INC 


A 


i* 1 


1280 47 


LD 


B,fl 


jERBIBT DEZIMLPUHKTSTELLUN6 


1281 3C 


INC 


A 


',* 1 


1282 D6 03 


SUB 


03 


i(DEZI(ttLPUHKTST. M HOD 3) + 2! '.'-STELLUKB - 3, UBTERLAUF? 


12B4 30 FC 


JR 


NC,1282 


'ME IN HE ITER 

■LEZT^ SUBTRAKTION RUECKBAEKBIB UND 2 ADDIEREN 


1286 C6 05 


ADD 


05 


12S8 4F 


LD 


C,A 


;ALS '.'-PARAMETER NACH C 

;■ ,■ ESnUENSEHT? 

; (BIT 6 DES FDRNATFLASS BESETZT?) 


1289 3A D8 40 


LD 


A,(40D8) 


128C E6 40 


AND 


40 


128E CO 


RET 


HZ 


;JA, FERTIB 


128F 4F 


LD 


C,A 


;NEm, ■.'-PARAHETER = 


12W 09 


RET 








'.' UND ',' SETZEN 




1291 05 


DEC 


B 


iDEZIHALPUNKTSTELLUK DEC, DEZINALPUNKT ERREICHT? 


1292 20 08 


JR 


NZ,129C 


;K1N 


1294 36 2E 


LD 


(hL),2E 
(40F3),HL 


;'.' IN BUFFER 


12?i 22 F3 40 


LD 


;','-SUFFERADRESSE ABSPEICHERN 


1299 23 


INC 


HL 


jBUFFERZEIBER INC. 


129A 4B 


LD 


C,B 


t','-PARAHTER = 0, KEIK ',' HEHR 


129( C9 


RET 






I29C OD 


DEC 


C 


i' '-PARAHETER DEC, HAECHSTE '.'-STELLUHfi ERREICHT 
jNEIH, FERTI6 

i',' In buffer 

jBUFFERZEIBER INC, 


129D CO 


RET 


NZ 


129E 36 2€ 


LD 


(HL),2C 


12A0 23 


IKC 


HL 


12A] OE 03 


LD 


C,03 


;','-PARAItETEfi = 3, NAECHSTES ',' NACH 3 D18ITS 


12A3 C9 


RET 







VORBEREITETE ZAHL IN ASCII-STRIN6 UKFDRNEN 
SEITE 51 



12J4 CO 49 OA 
1239 F2 4B 12 



CALL 
JP 



0AA9 
M24B 



iZAHL >' 
;JA 



1D137 



AN5PRUN8 DOUBLE UND SIM&LE 

12A4 D5 PUSH DE ;DE fiETTEK 

J^f?l.^r. ,. '^^ 20 jTYP TESTEH, SIWLE? 

12A4 E2 Efl 12 if P0,12Efl jJA 

litlll t!^^ ?^ iPmnm fuer '.' iwd ',' retteh 

2M E5 PUSH HL jBUFFERZEISEft RETTEN 

SL'i'^^^?,' ??■'■ V^'^ f/ftHL *0.5 IFICR RWDUIffi): ZfiHL MCHY 

12B1 CD F7 09 CALL 09^7 -KDHSTWITE NACH ( 

im CD 77 K CALL 0C77 jIAHL + 0.5 NACH I 

2B7 tf KW A fmRHALISIEfiWffiSfLAe LOESCHEK (CY) 

2M CO 7B M CALL 0B7B i MCHKOHBASTELLEM ABHflCKEN OHHE HOfiHALISlERUNB 

12B8 El POP HL jBUFFERZEIBER ZORUECK 

^U9 ^ „ ™' ^^ jPARAflETER FUER '.' UND ' ' ZURUECK 

?55 il IS '' '■'' "I'^^l^ i^E'^ER AUF FE3Tt;(m(WKflt(S^ftHTE« 1D15 BIS IDt 

H ?. ^ „ '■'* \" illFFERHZAEHLEft = lOD 

12C2C6 9112 CALL 1291 '-■ U«C ' ,' SETZEN 

^?S ^^B. K iPARAHANET^fi FUER '.' UHD ',' RETTEN 

12C4 n PUSH AF iZIFFERffZAEHLER RETTEH 

3C7 E5 PUSH HL -BUFFERZEIBER RETTEH 

IB "= .. ^^^ ^ KDHSTZEI6ER RETTEN 

12C9 06 2F ID B,2F jZlFFER - '0' -1 

12CB (H IHC B 5IIFFER . IIFFER * 1 

ISd Is PUSH HL ilfWST2£I6ER NACH HL ZWUECK UND NIEDER REITEH 

!?«^ ?. it °" "ifSLL 0D4fl iZAHL - KOHST HflCH ZAHL, UHTERLAUF? 

12D1 30 FS JR NC,12Cfl -HEIN, HEITER 

2D3 El POP HL JK0HSTZEI6ER NACH HL 2URUECK 

2D4 CD 34 OD CfiLL 0D34 -ZAHL t KONST NACH ZAHL (LETZTE SUBTRWtTION RUECKSAEHGIS) 

l^ll! E. ?!'"'■ iKONSTZEIBEfi (AUF NAECHSTE KOHSTANTE) NACH DE 

125B El POP W. iBUFFEHIEISER ZUfiUECK 

ZD'^O LD (HLJ.B jZIFFEH IN BUFFER EINTRA6EN 

12DA 23 INC HL ;BUFFERZ£I6Efi INC. 

ZDB Fi POP AF ;ZIFFERHZAEHLER ZUftUECK 

lUn^ ^r F ;PARAHETER FUER ■.' UND ■, ' ZURUECK 

3'e ?0 E2 51' 5z,12C2 ^^TS^' ""'■' ^'^ '^ ^^""" '''''''' 

l^l ^A l^u S iPAfiflfeTER FUER '.' UND ',' REITEK 

)5i |5 .- . f^S" * fBUFFERZEIGEfl RETTEN 

lf5?iroi tU W"" -«S^-<»'«>«LSSmENACHX 

12EB IB OC JR 12f4 jNEITER HIT SINGLE 

1^1 ^1 E^ ^ fSIN6LEiPflRAN£TEfi FUER ■.■ UNO '.■ RETTEH 

\W. S .n ., "'SH HL jBUFFERZEIGER RETTEN 

12EC CD 08 07 CALL 0708 -ZAHL t 0.5 FUER RUHDUNS 

™ ?^ « «A i?!?, Ln« '^^^^ ^^^ JtMfflfiLlSiEHlMB LKSCHEH (ftOO) 

J^? £? =? i^ ??'-'- ^"^ ;lNT(ZAHLt NACH Y, KEINE HORHALISIERUNG 

12F3CDfi4 09 CALL 09B4 j ZAHL NACH K 

2F4 El POP HL fBUFFERZEISEft ZURUECK 

^I ^r ^5n !^ fPARAHETER FUER '.' UNO ■ ' LOESCHEN 

2fflAF lOR A jNIEDERHOLUWSFLAG LOESCHEN 

^' U "2 '^ LD D£,13D2 ;ZEISER AUF KONSTANTEH 1E5 UND 1£4 

IS^ K Q, ,-, JEf. ,. ;NIEDERHDLU«GSFLft6 KOHPLEHENTIEREN 

?i^^'* ^2 '^'- 1"' i'-* UND ■,' SETZEN 

300 C5 PUSH BC jPARANEIER FUER '.' UND ',' RETTEN 

301 F5 PUSH AF N1EDERH0LUN6SFLA6 RETTEN 
1302 E5 PUSH HL ;BUFFERZEI8ER RETTEN 
\^^ ??»,.. P"SH D£ ;K0NSTZEI6ER RETTEN 

1304 CD BF09 CALL 09BF ZAHL NAEH Y 

l«n l\ ,r ""^ "L iKOHSTZEIGER NACH HL ZURUECK 

1308 04 2F LB 6,2F jZIFFER = 'O'-l 

13WI04 INC B -ZIFFER = ZIFFER M 

S It a ii^ ;g. " ""'^ "^ '^' '''''''''' 

130D 5F LD E,A 

130E 23 INC «L 

130F 7A LD A,D 

1310 9E SBC (HL) 

1311 57 LD O.ft 

1312 2J IHC HL 

1313 79 LD A,C ; (NSBI 

1314 9E SBC IrtLl ' 

1315 4F LD C,A 

1317 2B DEC HL fl^WSTZEJSER ZURUECK AUF ERSTES BYTE DER KONSTANTE 

IJie 30 FO JR HC,130A ;NEIN, WIIER 

3JftCDB7 67 CALL 07^7 ij^^,* "?|T NflCH ZAHL (LETZTE SUBTRAKTION RUECKSAENSIS) 

WW r„ Di no i^. Hr.. iWHSTZEIGER AUF NAECHSTE KDNSIANTE 

131E CD B4 09 CALL 09B4 jZAHL NACH I 

SEITE 52 



™ I? E, ^^^^ iKDHSTIElBER MACH DE 

??tU f?^ "L tBUFfERZEISER ZMUECK 

T«7x ^i. J^*'' ! I IFFER IH BUFFER 

Wi ¥, i^. ^ ;IUfFERZ£IGEfl IK. 

1327 3B D3 Jft C,12FC jWlN, BEITER 

132fl 13 S DE '"" '" "'^"^''' mzmU KDHSTAKTE UOOOOD) liEBERSEHEN 

!5?IH^1 LD fi04 ;H«H 4 ZIFFERN 

1326 18 06 JR lJ35 ;IN IHTESEft 

ANSPfltlNB INTEGER 

Wl ^ n. ., "^^S" "E {FDfilWT-FLfle RETTEN 

13J0 11 M 13 LD D£ 1308 ;Z£I6ER AUF KOBSTAKTE lOOOOB BIS IB 

^,^,5?.**' "-D fl,55 iZIFFERKZflEHLER - 5 

T« r? " '^ £^i i"* '■■' *" '•' '"Jf BILKCHIRH SETZEN 

W^t, ^l TJt Vi iPAfiA«TER FUER '.' UND '.' RETTEN 

1339 F5 PUSH AF ;ZIFfERNZ«HLER RETTEN 

\l¥A\ ?iS" "*- JBUFFERZEIBER RETTEN 

133i El EK M.HL ;);ilWTZEI6ER HACH H 

135E 44 LD B.lHLl {(HSBl 

133F C5 PUSH Bt jUND KOMSTAtlTE RETTEH 

^.^ 23 IK HL. iKONSTZEIttfi AUF NAECHSTE KOHSTflHTE 

}l*\ II |> fSP'.HL ;K0WTZEI6ER REITEM. BUFFER2E16ER ZURUECK 

^1^ I! „ .. ^1 "^>"'- iBUFFERZEIBER MACH k 

343 2fl 21 41 LD HL,f4121) -ZAHL LADEN 

34i04 2F LD bJf ZIFFER - ■O'-l 

"f 0^ 1« B fZIFFEfi . ZIFFER ♦ 1 

134ft 93 SUB e'"" ' (St)" '^*" "™ ^'*^' UHTERLflUF? 

1341 6F LD L,fl ' 

134C 7C LD AH 

1341 % SBC D ( («SB) 

134E 67 LD H.fl ' 

134F3CIF7 JR n£,1348 ;NEIII, MITER 

IM S 2i 4, T l^iJf. , HC iSt isV'Jfjr "^ "''"' ^'"«™" ™««^»'" 

™l,' r"'' " fKOHSTZEIBER ZWHJECK 

^Hll '^?^ "*- iBUFFERZEIBER ZURUEK 

}3S7 70 LD (HL},B ;ZIFFER IH BUFFER 

358 23 INC HL jBUfFEHZEieER INC. 

l^^ll rSn^ F ;IIFFERtiZAEHL£fi ZURUECK 

^T^. ^tI i^. ^J^ iPAfiAKTEfi FUER '.' UKD ■ ' ZURUECK 

S 2? D7 !? Lnz, IU7''"^^'' '''" '''^ ^'""" '''''''"'''' 

135ECB 91 12 HLL 12^1 ';'.■ UNO ' ,' SETZEN 

541 " LD (HL),A ;0 FUER ZElLEWMDE IN BUFFER 

l^f} h POP DC fK ZURUECK 

1363 C9 RET 



KONSTANTEN 

1344 00 00 00 00 F9 02 J5 A2 ;= IDIO 

134C FD FF 9F 31 A9 5F 43 B2 U 1D15 

1374 FE FF 03 BF C9 IB 0£ B4 = 1D14 

137C 00 00 00 00 00 00 00 BO ■= 1 (DOUBLE) 

n3S0 00 00 00 BO J. 1 (SINSLEl) 

1384 00 00 04 BF C9 IB OE B4 ;. 1D14 

FESTKUHHAKOMSTANTEN 

136C 00 80 C6 ft4 7E BO 03 j* lOOOOOOOOOOOOOOM 

1393 00 40 7fl 10 F3 5A 00 := lOOOOOOOOOOOOOOD 

139fl 00 flO 72 A£ 18 09 00 1= 100 0000000000 M 

13fll 00 10 AS D4 EB 00 00 i= lOOOOOOOOOOOOD 

13A8 00 EB 74 48 17 00 00 = lOOOOOOOMOOD 

13flF 00 £4 OB 54 02 00 00 = lOOOOOOOOOOD 

13B6 00 CA 9fl 3fl 00 00 00 ■= lOOOOOOOOOB 

1360 00 El F5 05 00 00 00 j= lOOOOOOOOD 

1JC4 80 94 95 00 00 00 00 = lOOOOOOOD 

13CB 40 42 OF 00 00 00 00 jx lOOOOOOB 

13D2 flO 84 01 = lowoOD 

3M 10 27 ,. i(^oB 

13Dfl EB 03 ;= loooD 

^^^. i\ ^ ■ lOOB 

13SE OA 00 -I lOB 

13E0 01 00 j= ID 

SEITE S3 



UP FUER SHt UNO ATN 

KUIRKT tULTIPLIKATIOH D£S ERBE6HISSES NIT -1 
1JE2 21 82 0? LD WL.mi }X ' -I - ftDRESM NACH HI 

13E5 E3 EI (SP),Hl jHIT RUEKSPRUtBADHESSE VEftlflUSCHEH 

13Ei E9 JP (HLI jZllR ftUECK»1HMfiA»EE5S£ SPRINGER 



m (AF.M.K.HL) 
Sfift-FUIKTIQN 



BILDET DIE WJRZEL EINER ZAHL 

I:1I>ARBUHENT 

0:I=FUNKTIM3HEflT 

13E7 CD A4 HI CALL WM ;MfiUHeNT IN DEK STACK 

13Efl 21 80 13 LB HL.ISSO jZElBER ftUf KQNSTAHTE 0.5 

13£B CD fll 0? CALL 0961 -Q.S BACH K 

13f(l 18 03 JR 13F5 jSPRlMG NACH (SP) tt X 



UP 



PONEB (AF.flC.DE.HL) 
BERECHNET DIE PDTEKZ EIHER ZAHL 
I:1SP)..(SP+31=BASIS 
X=EIPOHENT 



a:l=ER6EBNIS 

13F2 CD SI Ofl CALL OABl fEIPONENT IN SIH8LE UHUANDELN 

13F5 CI POP fiC (BASIS MACH Y 

1JF4 Dl POP BE 

13f7 CD 55 09 CALL 0955 jEXPIWENT TESTEK 

13FA 78 LD A,B (EXP IflSIS NACH A 

13fB 28 3C JR Z,1439 jEXPOtCMT = 0? -) EKP 101 BILDELT ERBEBNIS U) 

13FD F2 04 14 JP P,1404 jEIPDJEHT > 0? --> SPRUW 

1400 87 OR fi iBflSIC = UNO EIPONEHI < 0? 

1401 CA 9A 19 JP Z,199A jJA, /O-ERROR 

1404 87 OR fi {BASIC ' UND EXPO«HT > 0? 

1405 CA 79 07 JP Z 0779 ;Jft, «.S EM NACH I, FERTIS 

1408 D5 PUSH DE jBASIS RETTEH 

1409 C5 PUSH BC 

140A 79 LD fl.C jBASIC > 0? 

W^l li l^ " ^^ i^=°l. ^=° ^^^ BEl POSITIVER BASIC 1429 U» 1420 HICHT AUS8EFUEHRT 

MOB CD BF 09 CALL 09BF jEKPOKENT MCH Y 

1410 F2 21 14 JP P,1421 jJA 

1413 D5 PUSH DE jEKPOHENT RETTEH 

1414 C5 PUSH BC 

1415 CD 40 08 CALL 0840 jIHT lEKPMEHT) NACH t 

1418 CI POP BC iEKPfWENT ZUfiUECK NACH Y 

1419 Dl POP DE 

141A F5 PUSH ftF ;LSB IHTIEXPOHEHT) INICHT NORNALISIEBT) RETTEN 

141B CD OC Ofl CALL OfiOC ;INT (EKPONENT) = EIPtHENT? 

141E El POP KL iLSB INT (EiraiENT) ZUfiUECK 

141F 7C LD A,H ;INT (EXPONEHT) UHBERADE? 

1420 IF RRfl 

1421 £1 POP HL iBASlS NACH I 

1422 22 23 41 LD <4123J,HL iHSB 
1425 El POP HL :LSB 
142i 22 21 41 LD (41211, HL 

1429 DC £2 13 CALL C,1;E2 jJfi, ERBEBHIS t (-11 

142C CC 82 09 CALL Z,09B2 jIHT (EKPONENT) = EIPOWNT? --> BASIS = -BASIS 

i(D.H. INT (EXPONENT) <> EXPONENT BLEIBT BASIS HEBATIV 
;UND BENIRKT IN LOB FC-ERAORI 

142F D5 PUSH D£ |EIPWtfNT RETTEK 

1430 C5 PUSH BC 

1431 CD 09 08 CALL 0809 jLOB (BASIS) NACH X 

1434 CI POP BC sEXPOHENT ZURUECK 

1435 Dl POP DE 

i4Ji CD 47 08 CALL 0847 jLOB (BASIS) t EXPONENT UND DAVON EXP BESTlflHEN 



UP EXP (AF,BC,DE,HL) 
tl EXP-FUHKTIDN 



EXPONENTIALFUHCTION EINER ZAHL BESTIWIEN 

l:X=AR6UrtENT 

0:X=fUNKTIONSN£RT 

1439 CD fl4 09 CALL 09fl4 jARBUHENT RETTEH 

143C 01 38 ai LD BC,ai3B ;KQNSTflHTE 1.4427 HfiCH Y (= 1 / LOG (2) ) 

143F 11 3B AA LD D£,Afi3B 

1442 CD 47 Oe CALL 0847 ;AR6 / LOB (2) NACH X (ER6IBT Z-EIPOHENTEN DES Eft6EBNlS) 

14*5 3A 24 41 LD A, (4124) j2-EXP Efl6 >= 13AD 

144B FE 88 CP M 

144A D2 31 09 JP NC,0931 jJA, IN AIHAEHSIBKEIT VDN SIBN AR6, UEBERLAUF ODER ER6=0 

144D CD 40 OB CALL 0B40 jIHT (2-EXP ER6) NACH A UND I 

1450 Ci SO ADD 80 )fffFS£T ADDIEMN 

1452 Ci 02 ADD 02 i2-EXP EW > 12bD? 

SEITE 54 



M54 Dfl 3i 09 JP C,Ci9Jl jjfi, Sim. DKN (14M) 

1457 F5 PUSH Af :2-Uf Eli6 (MIT OFFSET) REITEH 

145B 21 F8 07 LD HL,07Fa ;INT (Af)6 / L06 (2) ) - 1 HflCH I 

145B CD OB 07 CftLL 07M 

145E CD 41 08 CALL 0841 ;MAl LOG (2) 

1461 Fl POP flF i2-EIP-ERS ZURUECK 

1462 CI POP BC ;M6 ZURUECK 

1463 Dl POP DE 

14i4 F5 PUSH flF j2-EIP ERB KIEDER fiETTEN 

1465 CD 13 07 CALL 0713 -,1 - ( L06(2) I IKT (Alffi / LN2 ) - 1) - ARe 

14&8 CD B2 09 CALL 09S2 

146B 21 79 14 LD HL,1479 iTflVLOfi-REIHE BERECHIfftt 

mi CD A9 14 CALL 14A9 

1471 11 00 00 LD DE.OOOO ;0.5 I 2 tl 2-EllP-ERB MACH 1 

1474 CI POP BC 

1475 4A LD C.D 

1476 CS 47 08 JP 0847 ;NIT REIHEKER6EBNIS nULTIPLIZIEREll 





KOItSTAHTEH FUEft EIP-REIHE 




1479 08 


;8 STUECK 




147fl 40 2E 94 74 


{= -1.41314E-04 


ICfl. - 1/7!) 


i47E 70 4F 2E 77 


i= 1.32«aE-03 


(CA. 1/6!) 


1482 6E 02 B8 7A 


i= -a.30136E-03 


ICfl. - 1/5!) 


1486 E6 flO 2A 7C 


;= 0.0416574 


(CA. 1/4!) 


148A 50 AA AA 7E 


1= -0.166665 


(Cfl - 1/3!) 


14BE FF FF 7F 7F 


;=■ 0.5 


(= 1/2!) 


1492 00 00 80 81 


J= -1 


1' - 1/1!) 


1496 00 00 00 Bl 


t= 1 


{' 1/0!) 



149A CD A4 09 


CALL 


09A4 


149D 11 32 OC 


LD 


DE,0C32 


MAO D5 


PUSH 


DE 


14A1 E5 


PUSH 


HL 


14A2 CD BF 09 


CALL 


09BF 


MAS CD 47 08 


CALL 


0847 


MA8 El 


POP 


HL 



UP RElltfl (AF.BCjCE.HLl 

BERECHHET REIHE = CI I Z • C2 I 11*3 + C3 t ZH5 

H1.>IE16ER AUF KOEFFlZIEItTEN 
(KL)=ANIAHL DER REIHEH6LIEDER 
(HL+1)..=K0£FFIZIEI(TEH 
OiI=REINENER&EBNIS 

|Z RETTEH 

jRUECKSmMBAMESSE SETZEN 

;(BERHIRKT MJLTIPLIKATION HIT Z AM ENQE) 

jKDEFF.-ZEISER RETTEH 

;Z HACK Y 

;Ztt2 HACH H 

;KQEFF.'ZE16ER ZURUECK 

UP REIHE2 (AF,BC,D£,HL) 

BERECHHT REI^ = CI + C2 I Z + C3 t Ilt2 * C4 I ZII3 

liSIEttE REIHE! 

D:5IEHE REIWI 

14A9 CD A4 09 CALL 09fl4 ;Z RETTEH 

MAC 7£ LD fl.lHL) ;AHZftHL DCT REIffiHaiEDEJt HACH A 

MAD 23 INC HL ;ZEJ6Efi AUF I.KOEFFIIIENTEH 

MAE CD Bl 09 CALL 09B1 jl.KKFFIIIEHTEM HACH I 

MBl 06 Fl LD B.Fl 

(MB2 Fl POP tf jKOEFFnEHTEHIAEHLEK ZURUECK) 

MB3 CI POP BC ;Z ODER Ztl2 (REM 2 ODER 1) HACH 1 

MB4 Dl POP DE 

MBS 3D DEC A ;FERTIfi? 

14B6 CB RET I Jfl 

14B7 D5 PUSH DE ;UHD tllEDEft RETTEH 

MB8 C5 PUSH 8C 

14B9 F5 PUSH Af {ZAEHLER RETTEH 

MBA E5 PUSH HL ;KOEFF.-ZEIBEfi RETTEH 

14BB CD 47 08 CALL 0847 ;! t Z (Z1I2) 

MBE El POP HL iKOEFF.-ZEIGER ZURUECK 

MBF CD C2 09 CALL 09C2 jWECHSTEH KOEFFIZIEHTEH HACH Y 

14C2 E5 PUSH HL ;K0EFF.-ZEI6ER RETTEH 

14C3 CD 16 07 CALL 0716 jKOEFFIZIEHTEH AUF I ADDIEREN 

MC6 El POP HL ;K0EFF.-IEI6ER ZURUECK 

14C7 le E9 Jfi MB2 jHEITER 

UP WtD (AF.BC.EE.HL) 
» RHD-FUHCTIOH 

ERZEU6UHB FINER ZUFALLSZAHL 
l;t=DUnflY AR6UREHT ()[=0) 

ODER IHTERVALLENDE (X > 0) 
OlJ=ZUFALLSZAHl. 
14C9 CD 7F OA CALL 0A7F jARBUHEHT IH INTEBER UHUAHDELH 

14CC 7C LD A,H ;AMUHEHT < 07 

MCB 87 OR A 

BEITE S5 



14C£ FA 4A IE 


JP 


14D1 BS 


m 


14B2 W FO M 


JP 


14BS E5 


P03H 


14M CD FO 14 


CftLL 


im CD BF 0? 


CftLL 


14H: EB 


EI 


14DD E3 


EI 


14KC5 


PUSH 


14K CD CF M 


CALL 


14E2 CI 


POP 


14E3 Dl 


POP 


14E4 CD 47 08 


CALL 


t4E7 21 F8 07 


LD 


14EA CD OB 07 


CALL 


14EB CS 40 OB 


JP 



H,lE4fl iJfl, FC-EBWR 

L tAfteUHENT = 0? 

Z,14F0 ]iti. REEaE ZUFALLSZftHL ZUISCHEN IMD 1 EllZEIffiEN 

HL ihftWilEHT ffilTEK 

UFO ;R£aLE ZUFALLSZAHL MCH I 

09BF ;WCH Y 

DE.HL ;AR6Ufl£NT ZURUECK, ZUFALLSZAHL KETTEN 

I5I*),HL 

K 

OACF jARetMHT AL5 SIMSLE MCH K 

BC I ZUFALLSZAHL UCN Y 

DE 

0847 i ZUFALLSZAHL HAL Affi NACH I 

«L,07F8 jPLUS 1 

OTM 

0B40 {EOS = IKT (ZUFALLSZAHL I AW + 1) 



UP RRND (AF.BC.DE.HL) 

REELLE ZUFALLsIAHL ERZEUGE« 
I:(40901.,14092)=IHJLTIPL1KATOR (FESIKOWIA 24 BIT) 

f40AA)..(40ACl=LETZTE ZUFALLSZAHL (FESTKWWA 24 BITl 
Oil'ZUFALLSZAHL 



14F0 21 90 40 


LD 


14F3 E5 


PUSH 


14F4 11 00 00 


LD 


14F7 4B 


LD 


14Fe 2h 03 


LD 


14FA 2E OB 


LD 


14FC EB 


EI 


HFD T) 


ADD 


14FE EB 


EI 


UFF 79 


LD 


1500 17 


ftLA 


1501 4F 


LD 


1502 E3 


EI 


1503 7E 


LD 


1504 07 


RLCA 


1505 77 


LD 


1S0& E3 


EX 


1507 D2 lb 13 


JP 


150A £5 


PUSH 


ISOB 2h M 40 


LD 


150E 19 


ADD 


ISOF EB 


EI 


1510 3A AC 40 


LD 


1513 B9 


ADC 


1514 *F 


LD 


1315 El 


POP 


15U 2D 


DEC 


1517 C2 FC 14 


JP 


ISIA E3 


EI 


151S 35 


iHC 


151C E3 


EI 


151D 25 


DEC 


151E C2 FA 14 


JP 


1521 El 


POP 


1522 21 « M 


LS 


1525 19 


ADD 


lS2i 22 AA 40 


LD 


1529 CD EF OA 


CALL 


152C 3E 05 


LD 


152E 69 


A^C 


152F 32 AC 40 


LD 


1532 EB 


EI 


1533 0& 30 


LD 


1535 21 25 41 


LD 


I5ia 70 


LB 


1539 28 


DEC 


153fl 70 


LD 


153B 4F 


LD 


153C 04 00 


LD 


153E C3 65 07 


JP 



KUE ZUFALLSZAHL ' LETITE ZUfflLLSIAHL t 425324ID + 3728S7D 
(UEBERTRAE6E niSSACHTEN) 

HL,4090 (ZEIGER AUF NULTIPLIMTOR 

KL 1 RETTED 

DE.OOOO ;ERBRE6 l= CDE) L0E5CHEN 

C,E 

H,03 (BYTEZAEHLER = 3 

L.Ofi iBITZA£ffl.EF = 8 

K,HL )£ft6REG NAL ; 

HL,HL iLSB 

DE,«. 

A,t jHSI 

(5P),HL ;ZEI6ER fH^ FAKTOR ZURUECK 

A.IHLl jBYTE LADEN 

;UND NAECHSTES BIT HERAUSSCHIEBEM 
(HL),A 

(SP),HL I ZEIGER KIEDER ZURUECK 

HC,I514 iBIT KICHT SESETZT? --> ADDITION UEBERSPRIHEEN 

HL ;6YTEZAEHLER RETTEN 

HL, I40ftfi) iLETZTE ZUFALLSZAHL ZU EftO ADDIEREN 

HL.DE jLSS 
DE.HL 

A,UOAC) jHSB 
C 

Cjft 

HL jBYTEZAEHLEfi ZURUECK 

L ;BYTE ABEEARBEITET? 

NI.14FC ;N£IN, HAECHSTES BIT 

(5P),»U. ;ZEI&ER AUF FAKTOR NACH HL 

HL )ZEI6Eft ERHOEHEN 

(SPt.HL iUND HIEDER AUF STACK 

H jBYTEZftEHLEft - 1, FEBTI6? 

ltZ,14FA ;flEIN, MEITER 

HL iSTACk KDRRIBIEREN 

HL.BObS iEHB v 372BT7D M.S KUE IUFW.LSZAHL SPElCHEfi« 

HL.DE {LSe 
(4MA),HL 

OAEF jTYPI = SIN6LE 

A, 05 ;NSB 
C 

(40AC},A 

DE HL *MAGH Y 

B.^o jEip y = (dahit zhischen o und d 

m.,4125 ;3I&N-FLAe SETZEM 

tHLl,B •f'.m pfJSUl'Jl 

HL ;EIP I ^ EIP Y 

(HL},B 

C,A jRSB tttCH C 

B.OO ;LSB LDESCHEH 

07i5 -.HOfiWLISlEftlM 



UP COS (AF,BC,D£,HL) 
It COS-FUWTION 



CaSIMUS-FUNKTIDM BERECfMEN 

SEITE 54 



]iI=ARHIHEtlT 

Otl^FUNKTlDMSKRT 

1541 21 BB 15 LD 11,1586 ;7£I6ER flUF PI/3 

1544 CD OB 07 CALL mt ;P!/2 AUF AR6UHEHT AODIERER 

UP SIN (ftP,K,DE,HL> 
U Sm-FIMTIDH 

SIMUS-FIMTIM BEftECHMEH 

hutmrntn 

0:i;«FL!ttt;TlMSKRT 

K = AM / 2PI - IMT (AR6 / 2P11 

1547 CD A4 09 CALL 09A4 ;AR6 RETTEN 

154A 01 49 83 LD BC,fl349 fKOMSTAMTE 2PI NACH Y 
154B U DB OF LD DE.OFDB 

1550 CD B4 09 CALL 0914 ;2PI MACH I 

1553 CI PH> BC !AR6 NACN Y 

1554 D] POP DE 

1555 ED ft2 08 CALL 0BA2 jl = ARS / 2PI 
1558 CD M 09 CALL 09fl4 ;AA6 / 2P1 RETTEN 

1551 CD 40 OB CfiLL 0B4O ;IIIT (ftfi6 / 2Pl I tlftCH H 
15SE CI POP BE ;AR6 / 2PI ZURUECK 

155F 01 POP M 

1560 CD 13 07 CALL 0713 jK = flfiS / 2PI - INT (AM / 2PI) 

.-„ , nr ., IHTERVALL (0..11 IN IKTERVALL (-0.25.. 0.25) TRANSFOBfllEREN 

1543 21 BF 15 LD HL,t58F jiEISER AlIF KONSTANTE 0.25 

15WM10 07 CALL 0710 ;l/4 - I NflCH i 

15i9 CD 55 09 CALL 0955 iH >= 0? 

W. II „ .r ^^ !'"'■« FUER KyLTlPLIKflTIOH MIT 1-11 LOESCHEN 

154DF2 77 15 JP P,1577 .-Jfl 

1570 ED OS 07 CALL 0708 jO.5 t If NACH I 

1573 CI 55 09 CALL 0955 ;I >- 0' 

1576 B7 OR A jFLAO FQEfi HULTI PLICATION BIT -1 SETIEN 

1577 F5 ^ PUSH AF UNO RETTEN 

1578 F4 82 09 CALL P,0982 ;JA, II = -I 
157B 21 8F 15 LD hL.ISBF |ZElBEfi AUf 1/4 
157E CD OB 07 CALL 070B -1/4 + X NACH I 

1581 Fl POP AF jFLAfi ZURUECK, SESETZT? 

132 D4 82 09 CALL NC,0982 jHEIN, K = - J 

1585 21 93 15 LD HL,t593 ;TAYLbRR£Iffi BERECHMEN 

15M C3 9ft 14 i? l*9ft j(F«TDfi 2PI STECKT IN KOEFFIUENTEN) 

KOflSTANTEN 

158B M OF 49 81 ;)CD(KTANTE 1.5708 (= PI/2) 

ISBF 00 00 00 7F jKQWTAKTE 0.25 

KONSTAHTEN FUER SIN-REIHE 

1593 05 [5 STUECK 

1594 BA 07 IE 84 ;= 39.7107 (CA. (2PI)tl9/9') 
IS'i ti 2,^. 'nt !l J= -74.575 .(CA. -(2PI)»7/7!) 
^?^?^}5?}^' )= *l'tM2 lEft. l2Pl)n5;5!) 

5«£05DA5e6 ;« -41.3417 (CA. -(2PIHt3/3'l 

15A4 DA OF 49 83 ;= 4.28319 lEA. 12PI)»1/1!) 

UP TAN (AF.BC.DE.HL) 
It TAN-FUWTIDN 

TANBEW-flJNKTION BERECHNEN 
I:X=AMl}flENT 
OiI^FUNKTIONSIfERT 

15AB ED A4 09 EALL 09A4 jARB RETTEN 

ISAfi CD 47 15 CALL 1547 jSIK (MtSl HACH I 

15AE CI POP BC iARG NACH Y 

15AF El POP HI. 

15B0 ED A4 09 CALL 09A4 ;SIN IARG) KTTEN 
15B3 £B El DE.Hl 

15B4 ED B4 09 EALL 09fi4 ;AR6 HACH X 

15B7 ED 41 15 EALL 1541 ;COS (AUG) NACH I 

15BA C3 flO 08 JP 08A0 ;I= SIN IARG) / COB (AR8) 



UP ATN (AF.BC.DE.HL) 
It ATN-FUNKTIOH 



AREUSTANEENS-FJNKTIW BERECHKH 

I:MR8UHENT 

0:]|=FtfNKTIDNSUERT 

AM < 0? 



15BD CD 55 09 CALL 0955 

15E0 FC E2 13 EALL H,13E2 

15C3 FE 82 09 CALL H,0982 

15E4 3A 24 41 LD A, (4124) 

15E9 FE 81 EP 81 



JA, ER8 t (-1) 
ABS (AM) NACH X 
AM < 1? 



SEITE 57 



1KB 38 OC Jfi C,1M9 jjfl 

15CD 01 00 61 LD BC.BtM ;NEIN: I ' 1 / AR6 

I5» 51 LD D,C jY = 1 

1501 59 LD E.C 

1SD2 CD A2 OS CALL UA2 ;)! = 1 / MS 

15D5 21 10 07 LD HL,0710 ;AHESSE FUER (HD-X MM I AUF STACK 

ISDS ES PUSH HL ;(RACHT QSIBE UflFONNlMe Rl£CK6flEN6I6) 

1509 21 E3 15 LD HL.15E3 jTflYLOfi-REIffE KRECHNEN 

tSDC CD 9A 14 CALL 149A 

15DF21B6 15 LD HL,158B ;Z£I6Efi AUF PI/2 

15E2 C9 WT 



KffltSTiUTE FUER ATlt-REIHE 

15E3 09 ; 9 STUECK 

15E4 4A 07 3B 78 ;= 2.8i623E-03 (CA 17171 

15E8 02 iE B4 7B ;= -0. 0161457 (Cfl -1/15} 

15EC FE CI 2F 7C j> 0. 042909* (CA 1/13) 

15F0 74 31 9A 70 ;= -0.0752896 (Cfl -1/11) 

15F4 84 3D 5A 7D ;= 0.1065i3 (CA 1/9) 

15F8 CS 7F 91 7E j. -0.142089 (Cfl -1/7) 

15FCE4BB4C7E ■= 0.199936 (CA 1/5) 

1600 6C AA flA 7F ;= -0.333331 (Cfl -1/3) 

1404 00 00 DO 81 ;= 1 

SPRUHfiTflBELLE FUEH FWttTIMEJI 

(TOKENS 07 BIS FA) 

1608 8A 09 37 OB 77 09 D4 27 EF 2fl F5 27 E7 13 C9 14 :07 BIS OE 

1618 09 08 39 14 41 15 47 IS A8 15 BD 15 AA 2C 52 41 OF BIS E6 

1628 5fl 41 5E 41 61 41 64 41 67 41 6A 41 6D 41 70 41 !E7 BIS EE 

163B 7F M Bl OA DB Ofl 26 OB 03 2A 36 28 C5 2fl OF 2A ;EF BIS F6 

1648 IF 2A 61 2A 91 2A 9A 2A ;F7 BIS FA 

TABELLE DER BASIC-KEYUORDS (NACH AUFSTEISENDEH TOKEHS SDRTIERT) 
DEit ERSTE BUCHSTABE 1ST JEKILS DUftCH HS GESETZTE BIT 7 6EKENMZEICWET 
80 Bl 62 83 34 
1650 C5 4E 44 C6 4F 52 B2 45 53 45 54 03 45 54 C3 4C EKDFDRRESTSETCL 

85 86 67 38 

1660 53 C3 40 44 02 41 4£ 44 4F 4D CE 45 56 54 C4 41 SCflDRAHDDHHEITDA 

39 aA BB 3C 
1670 54 41 C9 4E 50 55 54 C4 49 40 02 45 41 44 DC 45 TfllWUTDIWfEADLE 

SO 8E ^ 90 
1680 54 C7 4F 54 4F D2 55 4£ C9 46 02 45 53 54 4F 52 T60TORUNIFKSTOR 

91 92 93 94 

1690 45 C7 4F 53 55 42 02 45 54 55 52 4E D2 45 40 03 EBOSUMETUfiKREHS 

95 96 97 
t6flO 54 4F 50 C5 4C 53 45 04 52 4F 4£ 04 52 4F 46 46 TOPELSETRONTROFF 

96 99 9A 

16B0 C4 45 46 53 54 52 C4 45 46 49 4E 54 C4 45 46 53 KFSTHDEFIKTDEFS 

9B 9C 9D 

16C0 4E 47 C4 45 46 44 42 4C CC 49 4E 45 C5 44 49 54 N6DEFDILLIHEEDIT 

9E 9F AO Al 

1400 C5 52 52 4F 52 02 45 53 55 4D 45 CF 55 54 CF 4E ERfiORRESUNEOUTOK 

fl2 A3 fl4 A5 Ai 

16E0 CF 50 45 4E C6 49 45 4C 44 C7 45 54 00 55 54 C3 QPEBFIELD6ETPUTC 

A7 AB A9 
16F0 4C 4F 53 45 CC 4F 41 44 CD 45 52 47 43 CE 41 4D LOSELDADNERGENAN 

AA AB AC AD 
1700 45 CB 49 4C 4C CC 53 45 54 D2 53 45 54 03 41 56 EKILLLBETRSETSftV 

AE AF BO 

1710 45 03 59 53 54 45 40 CC 50 52 49 4E 54 C4 45 46 ESYSTEHLPRIHTDEF 

Bl B2 B3 B4 
1720 DO 4F 4B 45 00 52 49 4E 54 C3 4F 4£ 54 CC 49 S3 PDKEPRIflTCOHTLIS 

B5 B6 67 

1730 54 CC 4C 49 33 54 C4 45 4C 45 54 45 CI 55 54 4F TLLISTDELETEflOTO 

B8 B9 BA BB 
1740 C3 4C 45 41 52 C3 4C 4F 41 44 03 53 41 56 45 C£ CLEflRCLOADCSAVEH 

BC BO BE BF CO 
1750 45 57 D4 41 42 26 04 4F C6 4E 05 53 49 4E 47 D6 EtlTflBlTWHUSlffiV 

CI C2 C3 C4 
1760 41 52 50 54 52 05 53 52 C5 52 4C C5 52 52 03 54 flRPTRUSRERLERRST 

C5 C4 C7 
1770 52 49 4E 47 24 C9 4E 53 54 52 00 4F 49 4E 54 D4 RIMIIHSTRPOIMTT 

CB C9 Cfl 

1760 49 4D 45 24 CD 45 40 C9 4E 46 45 59 24 D4 48 45 IHEJNEMIIKEYtTHE 

CB CC CD CE CF 00 Dl 02 
1790 4£ CE 4F 54 D3 54 45 50 AB AD Afl ftF DB CI 4E 44 W«TSTEP*-»/iUWD 

03 04 05 D6 07 D8 09 DA 
17A0 CF 52 BE BO BC 03 47 4E C9 4£ 54 CI 42 53 Ci 52 0R>«<S6HINTABSFR 
DB DC 00 0£ OF 

SEITE 58 



17B0 45 E9 4£ 50 DO 4F 53 D3 51 52 112 4E 44 CC 4F 47 


EIKPPQSSSRRNDLOe 


EO El E2 E3 £4 E5 




17C0 C5 SS SO C3 4F 53 D3 49 4E D4 41 4E CI 54 4E DO 


EXPCDSSIKTANRTKP 


E& E7 E9 E9 EA 




17D0 45 45 4B C3 56 4? C3 Si S3 C3 5& 44 CS 4F 46 CC 


EEKCVICV5CVDE0FL 


EB EC ED EE 




17E0 4F 43 CC 4F 46 CD 4B 49 24 CD 4B 53 24 CD IB 44 


OClOFnKIMKSIflKD 


EF FO Fl F2 




17F0 24 C3 49 4£ 54 C3 53 4E 47 C3 44 42 4C C6 49 5B 


tCINTCSNBCDBLFII 


F3 F4 F5 F6 F7 




laoO CC 45 4E D3 54 52 24 Di 41 4C CI 53 43 C3 48 52 


LEN5TR«UflLASCCHR 


F8 F9 Ffl 




1810 24 CC 45 46 54 24 D2 49 47 48 54 24 CD 49 44 24 

FB 
1820 A7 80 


ILEFT»RI6HTtBIDI 





SFRUN6TABELLE FUER BEFEHLE 

(TOKENS BO BIS BB) 
1822 AE ID Al IC 3B 01 35 01 C9 01 73 41 D3 01 B6 22 
1832 OS IF 9fl 21 08 26 £F 21 21 IF C2 IE fl3 IE 39 20 
1842 91 ID Bl IE DE IE 07 IF fl9 ID 07 IF F7 ID F8 ID 
1852 00 IE 03 IE 06 IE 09 IE fl3 41 60 2£ F4 IF flF IF 
1B62 FB 2fl iC IF 79 4! 7C 41 7F 41 82 41 85 41 88 41 
1872 8B 41 8E 41 91 41 97 41 9A 41 AO 41 B2 02 67 20 
1882 5B 41 Bl 2C SF 20 E4 ID 2£ 28 29 2B C6 2B 08 20 
1892 7A IE IF 2C F5 2B 49 IB 



80 BIS 87 
88 BIS 8F 
90 BIS 97 
98 BIS 9F 
AO BIS A7 
A8 BiS AF 
BO BIS B7 
B7 BIS BB 



PR30RITAETSCDOES FUER OPERfiTDREN 
OER QPERATOft NIT DEB HOEHEREH CODE HAT PRIORITAET 
* - t I n AHDDR 
189A 79 79 7C 7C 7F 50 46 



SPRUN6TABELLE FUER TYPANPASSIM 
CDBL C]NT CSN8 TESTS 
IBAl DB OA 00 00 7F Ofl F4 OA Bl OA 



SPR11N6TABELLE FUER SRUNDRECHENARTEN m ^RSLEICH 
ENTHAELT FUER JEDEN NUBERISCHEN DATENTVP DIE flDRESSEN D£R 5 UP'S 
* - t / VER6LEICH 
IBAB 77 OC 70 OC Al OD £5 OD 78 Ofl iDOUBLE 
18B5 16 07 13 07 47 08 A2 OB OC Ofl ;SiHGLE 
IBBF 02 08 C7 OB F2 OB 90 24 39 OA jINTE6ER 

FEHLERABKUEfilUNBEN 

NAC« flUFSTEIBEMEN FEHLERCODES SQRTIERT 
1BC9 4£ 46 53 4E 52 47 4F 44 46 43 4F 56 4F 4D 55 4C NFSHR6ODfC0VOf1UL 
18D9 42 53 44 44 2F 30 49 44 54 40 4F 53 4C 53 53 54 BSDD/OIDTHOSLSST 
1BE9 43 4E 4£ 52 52 57 55 45 40 4F 46 44 4C 33 CNNfiR»UEH0FDL3 





DATEN UHD UP'S DIE BE! BASICINTIALISIERUW INS RAH 




UP FUER DIVISION 




1BF7 06 00 


SUB 


00 


iSUBTRAKTIQNi 22 - 11 NACH 12 


18F9 6F 


LD 


L,A 


;(LSB) 


IBFfl 7C 


LD 


A.H 
00 




18FB DE 00 


SBC 




16FD 67 


LD 


H,A 




18FE 78 


LD 


A,B 




IBFF DE 00 


SBC 


oh 




1901 47 


LD 


B,A 




1902 3E 00 


LD 


fl,00 


;nSB Z2 LADEN 


1904 C9 


RET 








STSTEN-DflTEN 




1905 4A le 






;USR-STARTADfiESSE (=FC-ERROR) 


1907 40 E6 40 






iNULTIPLlKATOfi FUER RND 




UP FUER INP 




190A DB 00 


IN 


A, (00) 


jEINGABEPORT NACH A LADEN 


190C C9 


RET 








UP FUER OUT 




190D 03 00 


OUT 


(00), fi 


;AKKU AUF PORT flUSGEBEN 


190F C9 


RET 







1910 00 

1911 00 

1912 00 



SySTEH-DATEH 



ilNKEYJ-INISCHEBSPEICKER 
jLETITER FEHIERCODE FUER ERR 
iDRUCtCKOPFPOSlTION 

SEITE 59 



mh 00 ;N. V. 

lt!i JE " iMFMfi MR STRIKSPKE 

l'I9 FE FF jAKTUELLE ZEILENNUfHER 

I'll £' « iP«06RA(WTEXIflllFAH6 

TEITE 

191& 20 45 72 72 6F 72 00 ERROR. 

1924 20 69 6E 20 00 IN . 

1929 52 45 41 44 59 OD 00 READY.. 

1930 42 72 65 &1 &e 00 MEAK. 

UP FUER FCm/KIT UND &OSUB/RETURH 

Hffl.T DATEN UOH STACK ZtMlECK 

19U 21 04 00 LD HL,0004 iSP M NACH HI 

1939 59 ADD HL,SP ; (2 RUECKSPRUHGADRESMII IffBERSEHEII) 

193A 7E LD fl.lHL) (FLAG LADEN 

193B 23 INC hi! 

19JC FE 81 CP &t jDATEN VDN FOfi-LOOP? 

193E CO RET NZ ;HEIN, FERTIG 

loi^^l li- ^''"'■' ;JA, LAUFVftRIABLENADRESSE LADEH 

1941 46 LD B,(HLt jtHSBl 

1942 23 INC HL 

1943 E5 PUSH HL ;ZEIGER RETTEN 

»9" 4' LD L,C iLftUFVARlABLENADRESSE HACH HL 

1945 60 LD H,B 

1947 B3 ""^ ^'^ jLflUFVftRIABLE AtBESEKH? 

1212 II «n U ^K^., i"^'"" "'^ ^^ ™ESSE DER GEFUKDEHEH LAUFVARIABLEH IN DE ZUfiUECK 

1747 iO vi in Z|tT4B 

194B EB EI DE.HL 

>'« JF RST 18 f Jfl, = GEFUHDENER LAUFVflRl ABLER? 

194D 01 OE 00 LD BC.OOOE MD HACH BC 

1950 El POP HL jZEISER ZURUECK 

IWl C8 RET Z jJA, FERTIG 

iSi?t^ ""* ^i.^ ;ZEf6ER AUF HAECHSTE STACr-DATEH 

1933 18 E5 JR 19iA ;KITER 

,«< « .r .n ?!Jf°*"*'t.'*" '^'' EINZUFUEBENDE PROBRAfflZEILE ODER VARIABLE FREIHACHEH 

2S SI " " ™: L™ '"-lEST HL NICHT HEHR IH FREIEN SPEICHER? --> OH-EfiROR 

™" ™SH BC ;(DE)..(M:) MCK I..HLJ TRANSPORT lERENs HL UHD BC VERTAUSCHEH 

IW tJ EI (SP),HL 

195A CI POP BC 

1^ ^. ^^ '^ i***** "ES flUELLBLOCKS ERREICHT? 

1«C 7E LD fl.lHLl (1 BYTE UHSPEICHERN 

19» 02 LD 1K),A 

195E Ca RET Z ;JA, FERTIG 

95F OB KC BC ;ZEl6ER DEC. 

1960 2B DEC HL 

19*1 IB Ffl Jfl 1958 [KITER 

TESTER DB 2IC BYTE FREI, KNN NICHT OH-EflflOR 

1963 E5 PUSH HL ;hL RETTEN 

\Vii 11 II *^ ^^ HL.MOFD) jANFAlK BES FREIEN SPEICHERS NACH HL 

IIH ^ "^ '■'' ^'^^ ;"SB BC LOESCHEN 

969 09 ADD HL.BC ;UND 2 HAL ADDIEREN 

196A 09 ADD ffl.,BC 

196B JE E5 LD flJs 

lil^yr ^5 Pp HL ;TESTEN OB HL WCH IN FREIEH SPEICHER: HL RETTEN) 

196D IE C6 LD A,C6 iHL > FFC6? 

19iF 95 SUB L 

1970 6F LD L.fl 

1971 3E FF LD A FF 

1973 9C SBC H 

1974 38 0* JR C,197A jJA, OB-ERROR 

1976 67 LD H,A iHL + 4A >« Sf' 

1977 J9 ADD wI.SP 

1978 El POP HL ;HL ZURUECK 

1979 D8 RET C ;NEIN, ZURUECK 

QN'ERROR 

197A IE OC LD E.OC ;Ofl-ERROfi-CODE MACH E 

197C la 24 JR I9fl2 [ZUR ERROR-ROUTIHE 

IHPLIZITE5 END 

!2I! It " *" '-'' W-,(40A21 iDIREKT-BODE? (KTUELLE ZHR = FFFF) 

I'Bl 7C LD A,H 

SEITE 60 



19B2 A3 
1M3 3C 
1984 29 08 
im U F2 40 
IW B7 
19SA IE 22 
I98C 20 14 
198E a CI ID 



im 2A M 40 
1994 22 fl2 40 



1997 IE 02 
1999 01 IE 14 



n?9A IE 14 
199C 01 IE 00 



(199D IE 00 
199F 01 IE 24 



n9M IE 24 



19A2 2A A2 40 
19AS 22 EA 40 
I9H 22 EC 40 
19AI 01 B4 19 
19AE 2A E8 40 
1911 C3 9A IB 
19H CI 
1915 71 
19U 41 
1987 32 9ft 40 
19H 2A E6 40 
t9BB 22 EE 40 
i9C0EB 
19C1 2A EA 40 
19C4 7C 
19C5 A5 
19CA 3C 
19C7 28 07 
19C9 22 F5 40 
19CCEI 
19CI) 22 F7 40 
19M 2A FO 40 
1965 7C 
t9D4 B5 
1905 El 
mb 21 F2 40 
1909 28 OB 
19B6 bi 
19DC 20 05 
19K3S 
19Df EB 
19E0 C3 36 ID 
19E3 AF 
19E4 77 
19E5 59 
19E6 CD F9 20 
19E9 21 C9 IB 
19EC CD A& 41 
19EF 57 
19F0 JE 3F 
19F2 CD 2A 03 
19F5 19 
19Fi TZ 
I9F7 CD 2fl 03 
19FAD7 
19FB CD 2A 03 
19FE 21 ID 19 
lAOl E5 
1A02 2A EA 40 
lAOS E3 



AND 

INC 

JR 

LB 

W 

LD 

JR 

JP 



L 

A 

Z,198E 
A, 140F2) 
A 

E,22 

NZ,19A2 

IDCl 



;NEIN, SPRUNB IN END 
;TRAPFLA6 KSETZT? 

;NR-ERROR-CDDE NACH E 
jJA, NR-ERROR 
i SPRUNG IN EHB 



SySTAI-ERROfi IN DATAIEILE 

LD HL,(40DA) jLETZTE DATAZEILE 

LD (4liA2),HL j^ALS AKTUELLE ZNR APSPEICHERN 

SH-ERROft 
LD E,02 

LD BC,141E 



ISN-ERROR-CQDE NACH E 



/0-ERROR 
LD E,14 
LD H.OOIE 



Iff -ERROR 
LD E.OO 
LD BC,241E 



RH-ERRDR 
LD E,24 



ERROR 

LD 

LD 

LD 

LD 

LD 

JP 

POP 

LD 

LD 

LD 

LD 

LD 

EX 

LD 

LD 

AND 

INC 

Jf) 

LD 

EI 

LD 

LD 

LD 

OR 

EI 

LD 

JR 

AM 

JR 

DEC 

EX 

JP 

XOR 

LD 

LD 

CALL 

LD 

CALL 

LD 

LD 

CALL 

ADD 

LD 

CALL 

RST 

CALL 

LD 

POSH 

LD 

EI 



(CODE IN E) 
HL, 140A2> 
(40EA),HL 
(40ECI,HL 
BC,1964 
M.,(40Eei 
IMA 
BC 
J,E 

(J09A),A 
U, (40E6) 
(40EE},HL 
DE,HL 
HL, (40EA) 
A,H 

A 

Z,19D0 

t40F3),lfl. 

DE,HL 
i40F7),W. 
HL, (40F0) 
A,H 

DE.HL 

HL,40F2 

Z.19E3 

(HL) 

NZ,19E3 

(HL) 

DE,»L 

lD3f> 

A 

(HL],A 

24f9 
HL,18C9 

41 Ai 

D,A 

A,3F 

032A 

HL,DE 

A, (HL) 

032A 

10 

032A 

HL,191D 

HL 

HL, (40EA1 

(SP),HL 



i/0-ERROR-CODE NACH E) 



;KF-ERRDR-CODE NACH E) 



iRH-ERROR-CODE NACH E) 



;AKTUELLE ZNR ALS 

jFEHLER-ZNR 

;UHD '.'-INfi ABS^ICHERII 

;NAECHSTE ADRESSE IN ERROR-ROUTINE 

;STACK-ANFANG NACH HL 

;SPRUN6 IN NED: STACK INITIALISIEREN 

ISTACK K[ffiRI6IEREN 

;FEKLEf)CODE NACH C 

lABSPEICHERN 

jAKTUELLEN POINTER 

]ALS FEHLERPOINTER ABSPEICHERN 

;UND NACH DE 

iFEHLERIEILE « FFFF? 

; (DIREKTHDDE) 

iJA, HEINE UNTERBfiECHUNSSPARAHTER ABSPEICHERN 

jFEHLERZIffi NACH CONTZNR 

; FEHLERPOINTER NACH HL 

iALS CONTPOIHTER ABSPEICHERN 

;TRAPPDINTE() LADEN 

;=0? 

flKEIN FEHLERTRAPl 

;NACH DE 

jTRAPFLAG-ADRESSE NACH HL 

IJA 

iNOCH OFFENER FEHLERTRAP (DHNE RESUHE)? 

jJA, KEINEN TRAP BEHR DURCHFUEHREN 

;TfiAPFLA6 SETZEN 

iTRAPPOINTEfi NACH HL 

;UND PROSRAHHAUSFUEHfWNS DORT FORTSETZEN 

jTRAPFLAfi LOESCHEN 

;FEHLERCOH 7UIIUECK NACH E 

;CR, NENN N0ETI6 

;ZE16ER AUF FEHLERABKUERZUN6EN 

iDOS-AUFRUF FUER KLAfiTEIT-FEHLERfKLDUHBEN 

;D = 

;'?■ NACH A 

jAUSBEBEN 

jFEHLERCODE AUF TABELLENANFANG ADDIEREN 

jl.BUCHSTABEH DER FEHLERABKUERZUNB LADEN 

;UND AUS6E&EN 

;2.NJCHSTABEN LADEN 

;UM AUSGEBEN 

iZEIBER AUF TEXT ' ERROR' 

jRETTEN 

;FEHLERZMt LADEN 

;HIT TEITZEIGER VERTAUSCHEN 

SEITE 61 



1A(U CD A7 2S 
lAOf El 
IflM 11 FE FF 
IMDDf 
IflOE Efl 74 06 
lAll 7C 
1A12 AS 
tA13 3C 
lfll4 C4 fl7 OF 
iA17 3E CI 



(lAie ci 

lAl? CD SB 03 
lAlC CD AC 41 
lAlF CD FB 01 
1A22 CD F9 20 
1A25 21 29 19 
tA28 CI A7 28 
tA2B 3A 9A 40 
tA2E D6 02 
1A30 CC 53 2E 
1A33 21 Ff FF 
1A36 22 A2 40 
IA39 JA El 40 
1A3C B7 
1A3D 28 37 



1A3F :A E2 40 
1A42 ES 
1A43 CD AF OF 
lA4i Dl 
1A47 D5 
1A48 CD 2C IB 
1A4B 3E 2A 
1A4D 38 02 
1A4F 3E 20 
IA51 CD 2A 03 
1A54 CD 61 03 
1A57 Dl 
IAS8 30 06 
lASA AF 
1A56 32 El 40 
1A5E 18 89 
1A60 2A E4 40 
1A63 1? 
1A64 38 F4 
1A66 DS 
1A67 II F9 FF 
1A6A DF 
1A6B Dl 
166C 30 EC 
1A6E 22 £2 40 
lfi71 F6 FF 
1A73 C3 EB 2F 



1A76 3E 3£ 
]A7a CD 2A 03 
1A7B CD 61 03 
IA7E DA 33 lA 
lA8i D7 
IAS2 3C 
1AS3 3D 
1A84 CA 33 lA 
lflB7 F5 
tA88 CD 5A IE 
lABB 2B 
1A9C 7E 
lABD FE 20 
1A8F 28 FA 
IA91 23 
1A72 7E 
IA93 FE 20 
1A95 CC C9 09 

1A9B D5 



CALL 

POP 

LD 

RST 

JP 

LD 

AND 

INC 

CM.L 

LD 



28A7 

HL 

K.FFFE 

18 

Z,0674 

A,H 

A 

NZ.OFft? 

A,C1 



;' ERROR' ALISMUCKEN 

;FEHLER-ZW NACH HL 

i«FFFE? (65534D) 

;(D.H. FEHLER IN IKTIALISIERIWG) 

;JA, MEUE SrSTEHINITIALISIERlMe 

;"FFFF? (i5535Dl 

) (DIREKTHDDE) 

iNEW, ' IN ' FEHLER-ZHR DfiUCKEN 



HAltf-TSCHLEIFE 
ANSPRUENBEi 1A18 ODER IA19 



POP 

CALL 

CALL 

CALL 

CALL 

LD 

CALL 

LD 

SUB 

CALL 

LD 

LD 

LD 

OR 



BC 
038B 
41AC 
OlFS 

20F9 

HL,I929 

28A7 

fl,(409fl) 

02 

Z,2E53 

HL.FFFF 

(40A2},HL 

A,I40E1) 

A 

Z,1A76 



;5TACK KORIIIBIEKN) 

)AUS6ABE-FLA6 AUF DISPLAY, CR, KNM HOETIG AUF DllUCKEf) AUS6EBEK 

iCASSETTEMECORDER AUS 

;Cf) AUF DISPLAY, KW NKTIG 

jZEIBER AUF 'READY' 

1 READY AUS6EBEN 

jLETZER FEHLER * SM-ERflOR? 

jJA, EDIT FEW.ER-ZW 
iAKTUELLE ZNR = FFFF 
SlDIREKTHODE) 
;fiUTO? 

;NEIN HQRHALE EINGAK 



PR06ftAHnEIN8AfiE UNTER AUTO 

LD HL,140E2I jHAECHSTE AUTO-ZNR LADEN 

jRETTEH 

jAUSBEBEH 

;NACH DE UHD HIEDER RETTED 



PUSH 

CALL 

POP 

PUSH 

CALL 

LD 

JR 

LD 

CALL 

CALL 

POP 

JR 

IDR 

LD 

JR 

LD 

ADD 

JR 

PUSH 

LD 

RST 

POP 

JR 

LD 

DR 

JP 



VL 

OFAF 

DE 

DE 

1B2C 

A,2A 

C,IA51 

A, 20 

032A 

0361 

DE 

NC,IA60 

A 

UOED.A 

1AI9 

HL, (40E4) 

HL.DE 

C,1A5A 

D£ 

DE,FFF9 

IB 

DE 

MC.IASA 

(4«2),HL 

FF 

2FEB 



iENTSPRECHENH ZEILE IH PRDGRAHNTEU SUCHEK, ZEILE VOftHANDEH? 

;'!' BACH A 

;JA 

*NEIN ' ' HACK A 

;'1' ^USBEKN HEHN ZEILE VOftHANI£H, SONS! ' ' 

;£IIKABE EINEft ZEILE IN BUFFER 

;AUTD-ZNR ZURUECK 

;KEIH BREAK? -> HOI01AL KITE8 

iAUTO-FLAfi LOESCHEK 

;tMD ZUR HAUPTSCHLEIFE 

;AUTO-INC KACH W. 

;AUF AUTO-ZNR ADDIEREN, I^BERLAUF? 

;JA, AUTO-nODE VERLASSEN 

;AUTD-ZNR RETTEN 

;NA£CHSTE AUTO-ZNfi > 6SS28D? 

lAUTD im ZURUECK 

«JA, AUTO-HODE VERLASSEN 

;NEUE AUTG-ZW) ABSPEICHERN 

jUEBER EDIT IE) IN HAUPTSCHLEIFE ZUH ABSPEICHERN 



NORMALE PRDGRAHflEIttBABE 



LD 

CALL 

CALL 

JP 

RST 

INC 

SEC 

JP 

PUSH 

CALL 

KC 

LD 

CP 

JR 

INC 

LD 

CP 

CM.L 



A,3E 

032A 

0361 

C,1A33 

lO 

A 

A 

Z,1A33 

AF 

1E5A 

HL 

A,(HL) 

20 

Z.IASB 

HL 

A,(HL) 

20 

Z,09C9 



PUSH DE 



■ > )> )fACH (\ 

■PROHPTZEICI^H AUSGEBEN 
;ZEILE IN BUFFEfi EIN6EBEN, BREAK? 
;JA, ZUN HAUPTSCHLEIFEN#AN6 
;1. ZEICHEH «> ' ') SUCHEN 
!= ZEILENENDE (0)? 

;JA, ZUn HAUPTSCHLEIFENANFAtffi 

;FLfi6 (Cr=l, VENN l.ZEICHEN ZIFFEfil RETTEN 

;ZNf) DECQDIEftEN 

;BlfFERZEIEER ZUR1£CK HIHTER ZNR: ZEI8ER DEC. 

;LEERZEICHEN? 

;JA, WITER ZURUECK 

;BUFFERZEI6ER AUF ERSTES ZEICHEN NACK ZNR 

;LEERZEICHEN? 

;JA, INC HL, l.LEERZEICHEN UEBER6EHEN 
;(NIfiD BEI LIST AUTDMTI5CH EIMfiEFlSST} 
;ZNR RETTEN 



SEITE 62 



lAff CD CO IB 


CALL 


Ifi^C Dl 


POP 


1A9D Fl 


POP 


mi 22 Eb 40 


LD 


lAAl CD 62 41 


CALL 


1AA4 D2 M ID 


JP 


1AA7 D3 


PUSH 


1AA8 C5 


PUSH 


tAA9 AF 


XOR 


lAAA 32 DD 40 


LD 


lAAD S7 


m 


lAAE 67 


OR 


3AAF F5 


PUSH 


tABO EB 


EI 


lASl 22 EC 40 


LD 


1AB4 EB 


EI 


1AB5 CD K IB 


CALL 


lABS CS 


PUSH 


1AB9 DC E4 2B 


CALL 


lABC 01 


POP 


lABD Fl 


POP 


lAK OS 


PUSH 


lABF ZB 27 


JR 


lACl Dl 


POP 


1AC2 2A F9 40 


LD 


IftCS E3 


EI 


1AC6 Ct 


POP 


1AC7 09 


ADD 


lACe E5 


PUSH 


im CD 55 19 


CALL 


lACC El 


POP 


lACD 22 F9 40 


LD 


lADO EB 


EI 


lADl 74 


LD 


tAD2 01 


POP 


1AD3 E5 


PUSH 


lftD4 23 


INC 


1AD5 23 


INC 


IAD6 73 


LD 


lflD7 23 


INC 


iflOa 72 


LD 


1AD9 23 


INC 


lADA £B 


EX 


lADB 2A A7 40 


ID 


lADE EB 


n 


lADF IB 


DEC 


lAEO IB 


DEC 


lAEl lA 


LD 


!A£2 77 


LD 


1AE3 23 


INC 


!AE4 13 


IHC 


1AE5 B7 


OR 


lAEt 20 F9 


JR 


tAE8 01 


POP 


1AE9 CD FC lA 


CALL 


lAEC CD B5 41 


CALL 


lAEF CD 5D IB 


CALL 


1AF2 CD B8 41 


CALL 


1AF5 C3 33 JA 


JP 


UP 


LPNT 

7CTI I 




CtlU 
l!/ 




a-j 


1AF8 2A A4 40 


LD 


1AF6 EB 


EI 



IBCO 

OE 

AF 

(40E6),HL 

41B2 

NC.IDSA 

DE 

BC 

A 

(40DD),A 

10 

A 

AF 

DE.HL 

(40EC),HL 

DE.HL 

1B2C 

BC 

C,2BE4 

D^ 

AF 

DE 

Z.IAES 

DE 

HL,(40F9I 

(SP),HL 

BC 

HL.BC 

Hi. 

1955 

Id 

140F91,W. 

DE.HL 

(hL),H 

DE 

HL 

HL 

(HL),E 

HL 

(HD.D 

HL 

DE,HL 

HL,(40A7) 

DE,HL 

DE 

DE 

A,(DE) 

(HLI.ft 

HL 

DE 

A 

NZ,1AE1 

DE 

lAFC 

41BS 

IBSD 

4ise 

1A33 



;ZHISCt€NCODE ERZEUEEN (HL = AHF-t, DC = LAEKBE+S) 

'ZHR ZUfiUECK 

;FLftG ZURUECK. DIREKTBEFEHL? 

]ANFAN6 DCS ZHISCHEWODES ALS AKTUELLEH POINTER ABSPEICHERN 

;JA, OIREKTBEFEU AUSFUEHREN 

im RETTEK 

jZEILENLAENfiE RETTEN 

|FLA6 FUER RESUHE UNO RETURN LOESCHEN 

;IWD ABSPEICHERN 

jZEILE LEER? 

;JA, FLAB Z=l 

jFLM RETTEN 

' ZIffi ALS 

;'.'-ZNR ABSPEICHEim 

;ZEILE IN PROWMflTEXT SUCKEN 
;ZEIEER DARAUF RETTEN 
;BEFUNDEN7 -> LOESCHEN 

;LEESE lEILE? 

;JA, ZUn HAUPTSCHLEIFENENDE 

;ZEILENADRESSE ZURUECK 

jPROGRAmTEUENDE NACH HL 

;RIT ZEILENLAENBE VERTAUSCHEN 

;PR06RAflNTEITENDE NACH BC 

;)£UES PROSRAmTEXTENDE NACH HL 

;UND RETTEN 

;PLATI FI£R EIMZUFUE6ENDE ZEILE FREINACHEN, KWi HOE&LICH 

;NEU£S PRKRAdHTEITENDE ZURUECK 

iUHD ABSPEICHERN 

;ZE1LENADRESSE NACH HL 

ilRBENDEINEH IEILENZEI6ER <> ABSPEICHERN 

iZHR ZURUECK 

jZEILEHADRESSE RETTEN 

;ZEILENZEIBER AUF ZEILENADRESSE 

;ZNR ABSPEICHERN (LSB) 

;(NSB) 

;I/0-BUFFERANFUG NACH DE 



;- 2, DORT FAEN8T ZHISCHENCODE AN 

jZUISCHENCODE IN PROSRAmTEIT UEBERTRAGEH: 
:1 BYTE 
IZEIGER INC. 

jZEILENENDE ERREICHT? 

;NEIN, KEITER 

; ZEILENADRESSE NACH DE 

;AB ZEILENADRESSE POINTER ERNEUERN 

iVARTABELLE IMD AHDERE PROBRAfWDATEN LOESCHEN 

|ZU(1 ANFANG DER HAUPTSCKLEIFE 



LPNT (AF, DE.HL) 
ZEILENZEIGER IM 



&ANZEN PROGRAftHTEIT ERNEtJERN 



HL,(40A4) 
DE,HL 



jPRDGRAHNTEITANFANG NACH DE 



UP LPNTP (AF, DE.HL) 

ZEILENZEIGER TEILHEISE ERNEUERN 

liDE^ZEILENADRESSE DERJENI6EN ZEILE, VON DER AM DIE ZEILENZE16ER ERNEURT MERDEH SaLEII 

0[/ 

jZEILENANFANG NACH HL 

;IEILENZEIGER = 0? 

i (PROSRAHHTEITEKDE ERREICHT) 

iJA, FERTIG 

iZNR UNO ZEIGER UEBER6EHEN 



lAFC f>Z 


LD 


H,D 


lAFD AB 


LD 


LE 


lAFE 7E 


LD 


A,(HL) 


lAFF 23 


INC 


HL 


1600 »b 


OR 


(HL) 


mi cs 


RET 


Z 


1B02 23 


INC 


HL 


lfl03 2J 


INC 


HL 



SEITE &3 



1604 13 


IK 


1»5 AF 


lOR 


IBM BE 


CP 


1B07 23 


IHC 


1B08 2C FC 


Jfi 


IBM E8 


El 


IBOB 73 


10 


IBOC 33 


IK 


\Kbll 


LB 


IBCE IB EC 


Jfi 



HL 

A ;A = 

(HL) iZEILEKEHDE? 

HL ;ZEI6£R IK. 

NZ,1BU ;KIH, KITB 

K.HL {ZEILENM^AW MCH HL 

m,l ;NAECHSTEH lElLEMAHFANG ALS ZEILENZEI6ER ABSPEICt£RH 

lW.),Ir ;IHSB) 

lAFC ;tEITER 



UP 



1810 11 00 00 


LD 


BE, 0000 


IBU K 


PUSH 


DE 


IBM 28 09 


JR 


Z.IBIF 


IIU Dl 


PW 


1617 CB 4F IE 


CALL 


1E4F 


181AD3 


PL(SH 


DE 


IBIS 28 OB 


J8 


Z,1B2B 
OS 


181B CF 


RST 


IBie CE 






IBIF 11 FA FF 


LD 


DE.FFFfl 


1822 U 4F IE 


CM.L 


HZ,1E4F 


1B25 C2 97 19 


JP 


NZ,1997 


1B2BEB 


a 


DE.HL 


1BI9 01 


POP 


BE 


1B2AE3 


EI 


(SP),HL 


IBZB E5 


PUSH 


HL 



LAftfi lAF.BC.DE.HL) 

AilALYSIERT ZUI AR61MEHTE FUER LIST 

FEHLEWE Afi&UHEHTE HERDEN ElfTSPKniEW ERBfeHZf 

I:F:Z=1, HEKK 50F0RT ZEILEHEHDE 

HL=ZEt6ER AUF DEH TEXT 
0:BC=ZEILENABRESSE DEH l.ZNR, ODEA HENH NICHT VORKANDEH, DER HAECHSTEH lEILE 
(PR06(tAMWtFAN6 BEI FEHLEKDEH 1 . AftSUHEIIT] 
15P1, (SPtU=2.I» 
(6S530D, HEHN 2.AR6imEKT FEHIT ABER '-' AN6E6EBEK, 5DNST l.ZMR) 

;1.ZNR AUF 

;RETTEN 

iZEILEWHDE? -> HEITEf) 

)0 MIS STACK EHTFEIWEH 

ii.ZHR SECOBIEREN 

;UND RHTEN 

;KEIHE KITEREN ZEICI€H? -> KITER, 2.ZNfi > t.ZNR 

iSYHTAHCHECKi ZEI6ER AUF '-'-TOKEN? 
H 

{2.ZNR = FFFA (&5530D) 

;t€ITERE ZEICHEH? -> 2.ZNR DECDDIEREN 

jHOCH HEHR ZEICHEK? -> SH-ERRDR 

;2.ZHR MCH HL 

;1,ZHR HACK DE 

;2.ZNR HIT fiUECKSPRlMSADRESSE VERTAUSCHEH 

;UND R1£»SPRUN6ADRESSE IIIEDE8 RETTEH 



UP SLINE <AF,BC,DE,HL) 

SUCHT ZEILE IH fllOSRAffiTEIT 

UK'im DER ZEILE 

OiZEILE VORHAHDEN: CY«1, 1=1 

K=ZEILEWDRESSE 
HL=AHE5S£ DER HAECHSTEH ZEILE 
ZEILE KICHT VORHANDEK! CY=0, Z=0 

BC=ZEILEKADRESSE DER HAECHSTEH ZEILE 
HL=ZEILEHADRESSE DER DARAUFFDLGEHDEM ZEILE 
NICHT 6EFUHDEH UHD PROORMHTEXTEHDE: CY=0, Z=l 

BC, W.= PRO6RAmTEUEH0E-2 
1B2C 2A A4 40 LD ^, (40A4) ;PRDGRAHHTE]ITANFAH6 HACH HL 
mr 44 LD B,H iZEILENADRESSE KACH BC 
1B3D 49 LD C,L 

1831 7E LD A,(HL) iPRDGRAMTEITENE? ' 

1832 23 INC HL ;(ZEILEMZEIGER ■ OOOO?) 
1B33 Bi OR (HL) 

1B34 2B KC VL 

1B3S C8 RET Z ;JA, FERTIG 

lB3i 23 INC fti. iZEIGER AUF ZMt 

1837 23 IK HL 

tB3B 7E LD A, (HL) ;ZNR HACH HL 

1839 23 IK HI 

183A 1,6 LD H.IHLI ;(NSB) 

1B3B 6F LD L.A 

1B3C DF RST IS ;= 6ESUCHTE ZNR? 

1B3D &0 LD H,6 jZEILEHADRESSE NACH HL 

1B3E W LD L.C 

ISSF 7E LD A.IHL) ;ZEILENZE!6ER LADEN 

1B40 23 IK li 

1B41 U LD H,(HL) :(HSBI 

1B42 6F LD L,A 

1B45 5F CH jCY KOWLEHENTIEREH 

1B44 Ca RET I iJA 

1845 3F CCF jCY KIEDER ZlffiUECK 

1B4& DO RET K jZWt > 6ESUCHTE ZKR? --> FERTI6 

1B47 18 E& JR 1B2F ;tlEITER 

tt REH'BEFEHL 

ALLES LOESCHEN (DIE STRIN6SPACEHFIItITI0H BLEIST ERHALTEN) 
1B49 CO RET HZ {HEITERE ZEICf^H? ~> SN-ERRDR 

tS4A CD C9 01 CALL OtC? ;BILBSCHIRf1 LOESCHEN 

SEITE 64 



lU} U tt iS: H . HL,140fl4) iPRQSfiflBHTEKTAHFflW BACH HL 

1850 CD F8 ID CftLL IDFa jTROFF 

■fS? ^^ " " k^ '*''^'*<'' iflUTO LOESEHEN 

JB57 23 IJC HL^^^ i (PROBRAffil L«SCH£«) 

Ii39 23 INC HL 

1«t1 ^i i2 iS HI L*^,'.Li.'i'; iPMGRWmTEUENDE HINTER OOM-IEILENZEIBER 

I?? n^? " *** .^?n ""-> '*°**' ;PfillSRA«HTEITflHFAI*B NflCH HL 

IBaO IB DEC HL j-1 

/SJi fl? I^ *" f." i"P''''^ i^l-S PQINTEfi Zlffi PBDSRAHHFORTFUEHBUW 

I^lA^ m i. \l h^'i,., ;TYPC£JDETflBELL£ = SIN6LE: ZAEHLER = 2iD 

Bl I? ^l *' ,'■? *'*"" iTflBELLENAKFANfi = 4101 

!lb ^ " ';t '"*■'•"* iTYPCDDE FUEB SIHBLE EIHSCHREIBEM 

l?l ?? .„ ^^ "t- itWECHSIES BYTE 

flfiC 10 FB DJNZ 1B69 HEITEfi 

11^ ^ rn » /?^ " jTRAPFLA6 LOESCHEN 

IBif 32 F2 40 LD (4W21,fi 

1172 iF LD L.fl ja = 0000 

1B73 67 LD H.A ' 

lll^^^t^i^ ,'■? f«FO),HL jTRflPPQIHTER LOESCHEH 

WZ ^^. {] ^^ \l (40F7),HL COKIPDINIEfi LOESCHEN 

m 1^ ^ i«^ ^S ^klfr^!i! ;STfiIN8SPACE LOESCHEN. RflHENDE 

Z ft fl IS KlL 1*09^'"^ iSr^'''*'""^' ^^^^"^"^" 

1S25 ^,5 ^.! *^. \i ^' **^'* fPfifffiRAHHTEnENDE LADEN 

L^ n^2 fl f.^ "-O 140FB},* ALS VARTABENDE 

IMC CD BB *i CALL llfl"''"^ ''""" *»RAYTflBEIIDE ABSPEICHEfW 

IE ^i «« j^ fl'' ^ ;RUECKSPRUN6ADRESSE NACH BC 

|2f ?B* '^ *<* L" HL, (40AO) iSTRIWSPACEAXFANG - 2 

iBti iB DEC HL 

1B94 2B DEC HL 

IBM 23 ^^ " "ilc y""''""- '*LS STACKANFAW ABSPEICHERH 

IflW 23 IK HL '* ^ 

lliy^l.... f? ^^^ ilHSTACKPaiHTEfi 

ISSE 22 83 40 LD uff HL '^''^^'^"^"^^'^"Efl FtlER STRINSS LOESCHEN 

1BA7 AF lOR A ifl = 

|M9 47 LD H.fl HL = 

lBA9iF LD lJa 

IS U ""^ " .^ou i?^'"^'-'* [ARRAYSPERRUW AUFHEBEN 

551 rl lH?"u S; '" "^^ STACK, ALS ENDHARKIEKUfffi 

S^ ?fl nc ifi ,1^^" u^,*^ ,»« ifiUECKSPRWBADksSE tilEDER RETTEN 

BB2 C9 RET ' ^"^" """" P™RAHHf DfiTFUEHRUNS LADEN 



Iff INLISA (flF,DE=401D,HLl 

VVic2 'J^lr^^ EfiHACHTET EIlffiABE EINEft ZEILE 

0:SIEI£ INLire 

1BB3 S 3F LD A,3F ;"" AUSGEBEH 

IBIS CD 2A 03 CALL oj2A 

Iflfla IE 20 LD A, 20 ;' ' AUS6EBEN 

18BA CD 2A 03 CALL oi2A ' "W"«n 

18BD C3 il 03 JP^ 0361 ;3PRUNG NACH INLINE 

tip ENCTKT SAF.K.DE.HL) 
ERZEU6T ZKlSCHENCdDE 

i"lt;^?!l?B '*"'' TEHANFANS (TEH HIT ABSESCHLOSSEN 
OjBC=Lfl£(ffiE DES ZNISCHENCODES + 5 

Iflrn « .n^'^^^P ""'' ^"^ ^'"^ ^NISCHENCODE = I/0-BUfFEfiA«FWG - 3 

;BEfJ5BO40 lT f4flB0,.A •■'=^"^^« ^"^^ 

'«" }l LD C.A jZEICHEHZAEHLER = 

IbS 2? A7 40 S ST40A7> "^''-S™'*'^*"^ - = ««"« 

1BC9 2fl DEE HL 

IBCA 28 DEC HL 

IBCB Efl Et DE.HL 

Sf72o S zV"'' :.™"^^i>e« 

1BCFCA5S1C JP Z.1C5B jjA ' 

1BD3 F£ 22 CP "^^ 'JJWJ* ^^^ TREHNZEICHEN KBCH B 

IBD5 CA 77 IC JP Z^IC?? -Jfl, sffilNS UEBERfRAGEH 

SEITE 65 



IB4D ?a U in in Ul IlrtAll .□□nCDAUUTFVTluPlX 



ma S7 

IBDf CA 7Q IC 
IBK 3A BO 40 
IBIF B7 
IBEO 7E 
IKl C2 SB IC 
1BE4 FE 3F 
1BE& 3E B2 
1BE8 CA SB IC 
IBEBTE 
IBEC FE 30 
IBEE 3S 05 
IBFO FE 3E 
IBF2 M 5B IC 



1BF5 D5 
1BF6 II 
IBFS C5 
IBFA 01 
1BFDC5 
1BFE06 
ICOO 7E 
ICOl FE 
1C03 38 
1C05 FE 
1C07 30 
ICMEi 
IDOB 77 
tCOC 4E 
icon EB 
ICOE 23 
ICOF B6 
ICIO F2 
tC13 04 
1C14 7£ 
1C15 E& 
1C17 CB 
ICIS B? 
1C19 20 

ICiC E5 
tClD 13 
ICIE lA 
tClF 87 
1C20 FA 
1CZ3 4F 
1C24 70 
1C25 FE 
1C27 20 
1C2? D7 
1C2A 2B 
lC2fl 23 
1C2C 7E 
1C2D FE 
1C2F 38 
1C3] Eb 
1CJ3 B9 
1C34 29 
1C36 EI 
1C37 IS 
1C39 49 
1C3AF1 
1C3B E8 
1C3C CV 



1C3D EB 
IC3E 7? 
lC3f CI 
1C40 Dl 
IC41 EB 
1E42 FE « 
1C44 36 3A 
IC46 20 02 
1C48 M 
1C49 23 
1C4A FE FB 
1C4C 20 OC 



4F li 
3D IC 

7F 

61 
07 
78 
03 
5F 



OE IC 

7F 

F3 

39 IC 



JP 
LB 
OR 
LD 
JP 
CP 
Lfi 
JP 
LD 
CP 

m 

CP 

JP 



A 

Z,1C7D 

A, (40801 

A 

A, (HLl 

H2,1C5B 

3F 

A, 82 

Z.ICSB 

ft, (HLl 

30 

C.IBFS 

3C 

C,1C5B 



LD 

PUSH 

LD 

PUSH 

LD 

LC 

CP 

JR 

CP 

Jfi 

im 

LD 

LD 

EX 

IK. 

OR 

JP 

]NC 

LD 

AND 

flET 

CP 

JR 

£1 

PUSH 

INC 

LD 

OR 

JP 

LD 

LD 

CP 

JR 

RST 

DEC 

INC 

LD 

CP 

JR 

AND 

CP 

JR 

POP 

JR 

LD 

POP 

EI 

RET 



8C,1C3D 

flC 

B,7F 

A, (HLl 

bi 

C.ICOC 

76 

NC.ICOC 

5F 

(KL},A 

C,(HL) 

DE.HL 

HL 

IHL) 

P,1C0E 

B 

A,(HL) 

7F 

I 

C 

NZ.ICOE 

K,m. 

HL 
DE 
A, (DE) 

H,IC39 
CA 

Sb^ 

K, lC2fl 

10 

HL 

KL 

A, IHL) 

61 

C,1C33 

5F 

C 

Z,]CtD 

HL 

ICOC 

C.B 

W 

DE.HL 



ZEILEHENK? 
JA, ZURUECK 
OATftFLflfi KSETZT? 

ZEICHEN LADEN 

JA, niNE ZHISCHEKDDE ERZElfBEN 

= *?'? 

PRINT-TOKEN MACH A 

JA, ABSPEICHEAN 

lEtCHEK LADEK 

< '0'? 

JA, ZUISCHENCODE ERZEU8EH 

< V'? 

t'JA, DIREKT ABSPEICHERN 



KEYHORDS ERKEWCN 
PUSH DE 

DE,164F 



ZHISCHEKQDE'ZEIBER RETTEN 
KEYMOMTABELLENANFANe NACH DE 
ZEICHEHAEHLER fETTEK 
RUECKSPR1M8ADRESSE SETZEN 

TKEN = 7F 
ZEICHOI LADEtl 
XLEIN6UCHSTA6E? 

NEIN 

HEIN 

IN SRDSSKICIISTABEN UHNANDELN 

ZEICHEN ABSPEICHERN 

l.ZEICHEN LADEN 

KETHORDZEIBER HCX HL 

HflECHSTES KEYWWQ 5UCHEN 

1.8UCHSTABE EINES KEYN0RD5? 

KIN, KITER 

TOKEN + 1 

t. FtCHSTABEN DES KEYHORDS LADEN 

RARK1ERUN6 LOESCHEH, KEYHRDTASELLEHENDE ERREICHT? 

JA 

= ZEICHEN AUS BUFFER 

N£I«, NAECHSTES KEYKORD 

ZEIBER VERTAUSCHEN 

BUFFERZEISER RETTEN 

KEmWDZEICER IK. 

BUCHSTABEN DES KEYNORD LADEN 

' MFtite DES MECHSTEH KE1UWDS? 

JA, KEYWRD ERKANHT, TOKEN AISPEICHERK 

NACH C 

TOKEN I SOTO - TOKEN? 

N£IN, UEITER 

JA, LEERZEICKEN IN. KEYWRD ERLAUBT 

BIFFERZEISER VOR HAECHSTES ZEICHEN 

BUffERZElGER fiUF NAECHSTES ZEICHEB 

LADEN 

KLEINBUCHSIABE? 

NEIN 

IN GROSSBOCHSTABEN WNANDELN 

= BUCHSIftBE AUS KEYWQftO? 

JA, NEITER 

NElN, BUFFERZEISER ZURUECK 

NEITER 

TOKEN NACH C 

ZEI6ER AUF AHFANG DES KEYWORDS ENTFERREN 

ZEIGER NIEDER VERTAUSHEN 



TOKEN BKR TEH ftBSPEICHERH 



EK 

LD 

POP 

POP 

EI 

CP 

LD 

JR 

IHC 

INC 

CP 

JR 



DE.HL 

A.C 

it 

DE 

H,HL 

95 

(HLf,3A 

NZ,IC4A 

C 

HL 

FB 

NZ.ICSA 



iZEl&ER VERTAUSCNEH 

TOKEN NACH A 

ZEIC>£NZAEHL£R ZURUECK 
'tZNISCHEHC0KZEI6ER ZllItl£CK 

ZEIGER VERTAUSCHEN 

TOKEN ' ELSE-T«EN? 

';' IN ZHISCHENCDDE 

NEIN 

JA, ':' EINFUEGEN: ZEICHEHZAENLER INC. 

ZUISCHENCDDEZE16ER INC. 

"■-TOKEN? 

NEIN 

SEITE bb 



1C4E 3i 3ft 


LO 


ICSO 23 


IHC 


1C51 Oi ?3 


LD 


ICSJ 70 


LB 


1C54 13 


INC 


1CS5 £B 


EI 


lC!i K 


INC 


1C57 DC 


INC 


ICSS 18 ID 


JR 


ICSA EB 


EK 


ICSB 23 


INC 


1C5C 12 


LD 


1C5D 13 


INC 


1C5E OC 


IHC 


1C5F D6 3fi 


SUB 


iCSl 23 04 


JR 


lCi3 FE flE 


CP 


1C65 20 03 


JR 


lCi7 32 BO 40 


LD 


ICtiA Di 59 


SUB 


ICiC C2 CC IB 


JP 


ICiF 47 


LD 


1C70 7E 


LD 


1C71 B7 


OR 


1E72 28 09 


JR 


ICU B8 


CP 


1C75 28 E* 


JR 


1C77 23 


INC 


!C7a 12 


1.D 


1C79 OC 


IHC 


lC7fl 13 


INC 


1C7B 18 F3 


JR 


1C7D 21 05 00 


LD 


ICSO 44 


LD 


ICai 09 


ADD 


1C32 44 


LO 


Its; 4D 


LD 


1C34 2ft fl7 40 


LD 


1CS7 2B 


DEC 


1C8S 2S 


DEC 


1C39 23 


DEC 


1C8A 12 


LD 


icaB 13 


INC 


ICBC 12 


LD 


1C8D 13 


. INC 


iC3£ 12 


LD 


ICSF G9 


RET 



\Z% 7E 
1C97 E3 
1C98 SE 
1C99 23 
1C9A E3 
1C9B CA 78 ID 
1E9E C3 97 19 



ICAl 3E 64 
ICfl3 32 DC 40 
iCfli ED 2] IF 



(HL),3A 

HL 

B,93 

(HLl.fl 

HL 

DE,HL 

C 

C 

1C77 

DE.HL 

HL 

(DE),A 

DE 

C 

3A 

Z,lCfi7 

4^ 

N2,1C&A 

(40B0),ft 

59 

N2,1BCC 

B.A 

A,(HL) 

A 

I,1C7D 

B 

I.ICSB 

hL 

m) ,A 

C 

DE 

1C70 

HL,M05 

B,H 

HL.fiC 

B,N 

C.L 

W.,(40A7) 

HL 

HL 

HL 

(DE),A 

OE 

(D£),ft 

DE 

(DE),A 



iiftEfl EINFUEGEN: ':' IN ZNISCHENCODE 
;ZWISCH£KCQDEIEI&£R INC. 
jREM-TOKEN NflCH 6 
;UND IN ZHISCHENCODE 
!2HISCHENCDDEZ£]6Efl INC. 
{ZEieER VERTAUSCHEN 
jZEICHENZAEHLER * 2 

ifiESTLICHEN PRMRftWITEn UNVERAENDEBT UEBEflTRA6EN 

iZEIBER VERTAUSCHEN 

jEUFFERZEIKR INC. 

iTOKEN ODER ZEICHEN ABSPEICHERN 

tZH I SCHENCQDEZE I 6ER INC. 

;lEICHEHlfiEHLEB IHC. 

■Jfl, DATA-FLAG LDESCHEN 

; DATA- TOKEN - 3A? 

jNEIN 

iJfl. DATAFLA6 SETZEN 

jfiEfl-TWEN - 3A? 

jNE!N 

{TfiENNZEICHEN ' ZEILENENDE 

;TEU BIS ZEILENENDE ODER TRENNZEICHEN UNVEflflEHDERT IN ZHISCHENCODE: ZEICHEN LAD 

)= ZEILENENDE? 

jJA, FERTIG 

i= TfiENNZEICHEN? INACH REN 0, NflCH "■ '") 

fJA, NEITER 

;BUFFERZEIGR INC. 

! ZEICHEN IN IHISCHEHCODE ftSSMlCHERH 

fZEICHENZAEHLER t l 

;ZHI5CKEkC0DEZEISER * 1 

jHEITER 

jZEICHENZAEHLER * 5 NACH BC 



iI/0-BlJFFERANFAN6 NACH HL 
I- 3 ER6IST ZE16ER AUF BTIE 
;VaR ZHISCHENCDDEANFANG 

jZNlSCHENCODEENDE HIT 3 NULLEN HARKIEREN 
ilDAHIT BEI DIREKTER PRQGRAimAUSFUEHRUNS 
;fln EHDE DER lElLE 8ESTWPT HIRfi 



1C90 7C 


LQ 


1C91 92 


SUB 


1C92 CO 


RET 


1C93 7D 


LD 


1C94 93 


aiB 


1E95 C9 


RET 



UF' CPHLDE lAF) 

RST I8-UP: VER6LEICHT HL UND DE 
I:HL, DEilo BIT INTEGER QHNE SIGN 
D:HL > DE: Z=0, CY=0 
HL ' DE: Z=l, CY=0, A=0 
fl < DE: Z^O, Cy=l 

A.H ;rtSB HL ' hSB DE' 

D 

NZ jNEIN, ZUfiUECK, BEITERER VERGLEICH UEBERFLUESSIS 

A,L jLSB HL I LSB DE? 



UP CHECK (AF,HL=P} 

RST 08-UPi SYHTAJCWCK 
I:HL=POINTER 

BYTE NACH RST 08H 
at(lfl.}>BYTE NACH RST 0»i: HL AUF MAECHSTEn ZEICWN, SDNST SN-ERRQR 



ID 

EI 

CP 

INC 

£1 

JP 

JP 



A, IK.) 

<SP),HL 

(HL) 

HL 

(SP),HL 

Z,1D7B 

1997 



;Z£ICHEN AUF PDINTERPDSITIDN IaD€N 
jPOIHTER HIT RUECKSPRUNGADRESSE VERTAUSCHEN 
;= DEH AUFRUF FOLGENDES BYTE? 
;RU£CKSPRUN6ADRES3E * 1 
!(MD HIEDER NIT POINTER VERTAUSCHEN 
;JA, RST 10, NAECHSTES ZEICHEN SUCHEN 
;NEIN, SN-ERRDR 



FQR-ANtfEISUNB 

HIEDERHOLUNSSANteiSUNG 

LD A, 64 {ARRAYS SPERREN 

LD (iODC),A 

CALL iF2! ;ANFAN6SZUHEI51IK6 AN LAUFVARIABLE 



SEITE 67 



1CA9 E3 EX ISP},HL {POIHTED RETTEH, RIIEa(9>Rim»MESSE ENTFERKEM 

IDM CB 36 19 CALL 19U jSCHlElFE KIT SLEICHER LAUFVARIABLE AUF STACK? 

ICU SI PDF OE ;PD1IITE(I HACK BE ZIRUECK 

ICAE 20 05 JR NZ.ICBS jHEIII 

ICBO 09 ABD HL,BC fJA, BURCH STACKKDRREKTUt ALLE SCHLEIFEN BIS DORT LOESCHEN 

ICBt F9 LD SP.tl iSTACKPOlHTER HEU SETZEH 

1CB2 22 E8 40 LB (40Ee),HL )UNB HEISN AHFAHeSHERT ABSHICHEM 

ins El EI BE.HL iPOIHTER MCH HL 

1CB6 OE 08 LB C.M ilh BYTE FREI? 

tew CD a 19 CALL 1H3 iHEIM, Qft-ERRW 

ICIB E5 PUSH HL iroilTTER RETTEN 

ICK CI 03 IF CALL IFK {NAECHSTE AWEIStMB (AHFM6 KS ANHEISUNSSTEILS) SUCHDt 

ICBF E3 EX (SP],HL iPOIHTD) DARAUF AUF STACK, POINTER ZURUECK 

ICCO ES PUSH HL {PDIHTER KTTEN 

ICCl 2A A2 40 LD HL,(40A2) ;ZNR LAO£M 

1CC4 E3 EI tSPJ.HL ;AUF STACK UW POIKTER ZURUECK 

1CC3 CF RST 08 )SYHTAXCHECKi POINTER AUF TO-TOKEN? 

1CC6 II > 

1CC7 E7 RST 20 ILAUFVARIABLENTVP TESTEN 

1CC8 CA Fi OA JP Z.0AF6 iSTRIKG? ~> TIKRIOR 

ICCB D2 F& OA JP NC,0AF6 ;nUBL£? -> TH-EMKK 

ICCE FS PUSH AF iTYf>FLA6 RETTEN (<FF BIE IHTEBER UNB 01 BEI SIH6LE) 

ICCF C6 37 23 CALL 2337 lEHMERTAUSBRUCK KffiCHNEN 

1CB2 Fl POP AF jTYP-FLAB ZURUECK, SINBLE? 

1CD3 ES PU^ HL {POINTER RETTEN 

1CB4F2EC1C JP P.ICEC fJA 

1CD7CB7F0A CALL 0A7f (INTESERi ENDHERT IN INTEGER UHHANOELN 

ICBA E3 EI (SP),>fl. iPfllNTER ZURUECK, ENBHERT AUF STACK 

ICBB II 01 00 LB BE.OWl {INCREHEHT > 1 

ICDE 7E LD HAm |NAECHST£S ZEICHEN 

ICIF FE CC CP CC )« STEP-TOKEN? 

ICEl CC 01 26 CALL Z.2B01 |JA, IHCREKNTAUSDRUCK AUSUERTEH UHD IN INTEGER UMIANDELN (MO DE) 

1CE4 B5 PUSH BE |IMCREHENT AUF STACK 

1CE5 E5 PUSH HL iPOINTER REHEN 

1CE6 El EX BE.HL ) INCREHEHT KACH HL 

1CE7CB9E09 CALL 099E jIHCRENEMT TESTEN 

ICEA 18 22 JR IBOE ;NEITER 

ICEC CD 11 OA CALL OABl ;EHDNERT IN SINGLE UHHMBELH 

ICEF CB ff 09 CALL 09BF iNACH V 

1CF2 El POP HL ;raiNTER ZURUECK 

1EF3 15 PUSH W {EMMRT 8ETTBI 

1CF4 DS PUSH BE 

1CF5 01 00 Bl LB K,8100 { INCREHEHT (Y) > 1 

1CF8 51 LD B,C 

1CF9 5A LB E.B 

ICFA 7E LD A.(HL) |NAECHSTES ZEICHEN 

ICFB FE CC CP K (= STEP-TOKEN? 

ICFB 3E 01 LD A.Ol ;FLA6 FUER FUER POSITIVES INCREHEHT SETZEH 

ICFF 20 OE JR NZ.IDOF ]HEIH 

1D01CB38 23 CALL 2338 ; INCREHENTAUSBRUCK AUSHERTEH 

IBC* ES PUSH W. )TOWTW KTTE» . 

1605 CB SI OA CM.L OAll ;IN SIHa.E UHHANDELN 

lOOB CD IF 09 CALL 09BF jUND NACH V 

IDOB CB SS 09 CALL 09SS |IHCREH£NT TESTEN IA=1, HEHN POSITIV UHD H^f, VENN NEGATIV) 

IBOE El POP HL iPOINTB) ZURUECK 

IDOFCS PUSH BC ; INCREMENT AUF STACK 

IBIO DS PUSH DE 

IBU 4F LB C,A ;IHC-FLA6 NACH C 

1B12 E7 RST 20 jTYP INC («TYP LAlffVARIABLE) TESTEN 

lBt3 47 LB 6.A )TYPFLA6 101, BEI SINGLE UNB FF BEI INTEGER) NACH B 

IQU C5 PUSH IC tTYFFLAG UHD IHC-FLA6 AUf STACK 

1B15 E5 PUSH HL ;POIHTER RETTEN 

1D16 2A BF 40 LD HL.(40Df} )LAUFVMIABLENAIRESSE NACH HL 

1B19E3 EI IS^l.HL iPOIHTER ZURUECK, LAUFVARIABLENADRESSE AUF STACK 

IDIA <A 81 LD B,81 |B1 (>FOR-TOKEN> NACH B 

IDIC CS PUSH BC |ALS HARKIERUNG AUF STACK 

IDIB 33 IHC SP )LSB ENTFERNEH 

PRDSRAWWISFUEHRUW 

HI flUSS AUF ':' OBER ZEILENENBE ZEIBEN 

IDIE CB 38 03 CALL 0358 tTASTATUMIFRME 

1021 B7 OR A iNEUE TMTE 6EDRUECKT7 

1D22 C4 AO ID CALL NZ.IDAO |JA, AMLVSIEREN 

1S2S22E6 40 LB t40E6),HL )AKTUELLEN POINTER ABSFEICHERN 

1D20 EB 73 E8 40 LD (40EB),SP tSTACKPUINTER ABSPEICHERN 

1B2C7E LB A.IHLI (ZEICHEN LADEN 

1D2B FE 3A tf 3A ('■'? (NULTISTATEHENTZEILEl 

1B2F 28 29 JR Z,1B5A ;JA 

1D31 B7 OR A (ZEILENENBE? 

SEITE i8 



H2 E2 97 19 JP nI,1997 (WIN, SN-ERRM 

035 23 mc HL ;PWI6iifll1NE«€? 

IH^ 23 Ilic hi: '*' ' '^E^LEKEISa « OOOO) 

tD3S U OR (HL) 

I"? ", ^^ ^' JP ^j"^ i", INPLIIITES END 

lS!i?3 \5c 5l**' '^'«^" 

15^51 LO D.IHL) ;{RSB1 

In?? II *^ irt ,^^ ^3. . i^f* '•*'^" HL, POIKTEil KACH K 

Z 1 15 i^ t5 ! i5?lkf ■a?.^ «^^^-^'" "^^^^^"^-^ 

ID47 B7 QR fl 

S15 °4 TH fP "^ POINTER RETTEN 

1040 CO 2fl 03 CALL oilfl "usocsw 

IL'Jt^K*^*^ fif-'- ''f*P JZMR flUSSEBEN 

IDS3 3E 3E LO ft,!E ■'<' MJS6EBEII 

1053 CO 2fl 03 CALL O^A ' ^^ 

SI SI ^ "E (POINTER lURUECK 

nu nl lir ?^'* fP"!"^ "lEKfl NMN HL 

IflK M P^H OE iWfEttSPfiOHBAMESSk SETZEN 

IKFM RET I ;JA 

IDU DA 80 SUB 80 iTOKEK? 

4047 D2 E7 2A JP w:,2flE7 gS^SUMSTOKEII? 

ffiX r Cfl ;T0«N.2NACHiC 

104C Oi 00 LD b'oO 

,'r°^ !?.,,„ " "^'"L 1 POINTER NftCH BE 

nf. « ^^ ^^ ^*L ""-''^^ fSPRUNBTABELLEKANFAW NACH HL 

n7T « ,*?'' ?-I,??, '* 2 t TtKEH ERfilBT lEIBEfi 6UF SPRUHSADRESSE 

id" 23 ^NC hI iSPRWieflDRESSE LADEN 

15" li LD B.IHL) ((MSB) 

D74C5 PUSH Bfc lUM RETTEN 

--_ _ "^lIL SPUINTER ZURUECK NACH HL 

IB» CHfiBET (AF,HL«P) 

fiST 10-UPi &UCHT NAECHSTES 3ISNIF1KANTES ZEICHEH UNO SIBT INFOHHATIONEN UEBEH ES 

DiVzEICHEN 
ZIFFERi CY«1 
'!' ODER 00: Z-1 

sr;§?i2o fp^ s ^>.; 

'ffi^ftl'" ^4 it"*" iJA, 'NAECHSTES ZEICHEN 

1082 FE OB CP OB ;( OB' 

M*30M Jfi NC,lD8fl NEIN 

1D3& FE 09 CP 09 i) 09? 

1MB FE 30 ^" {? ?o'"" I'AoH' ** '^* «*" «>^™ SUCHEN 

loss 3F CCF iiifiH n ■ i 

ISSIS i " zliNB^/ 

isfo a ?e[ ' '''^ '" 

tt RESTDRE-MKISUNG 

.no. r» DATflZElBER ZURUECKSETIEN 

IDW 2B DEC HL (PROBRAffiTEITAHFANe MCH HL 

1555 ?5 ''^ " ^c? il^^I^'^ '«-S DATAIEIGER ABSPEICHERN 

1D9AC9 RET "^'"^ ! POINTER ZURUECK 



flSIHrLi^T '**^'*^'' "°6^''W""JSFliEHRUN6 ODER LIST ANALYSIEREH 

109B CD 53 03 CfiLL 0338 jTflSTATURfiBFRftSE 

IMP rfl DCT ? i^E^E "STE SEDRUECKT? 

109F Ca RET I jNEid, PERTIS 
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AHSPRUNS PRtUiRAHHAUSFUEHRiNffi 
IMO FE iO CP 60 ; SHIFT KLANHERAFFE? 

tM2 CC B4 03 CALL Z,0384 ;JA. HAECHSTEN TASTEHDRUCX ABHARTEH 

IDAS 3! n 40 LD 14099), A ;IEICHeH IH IHKEYt-ZHISCHENSPEIUER ABSPEICHERN 

IDAS 31 DEC A (BREAK? 

1DA9 CO RET N2 iHEl*, FERTIB 

PROeRAmUflTERBRECHUNG DURCH BREAK 
IDAA 3C INC A ;FLA& A > t lUHTERBRECKUW DURCH BREAK) 
iOAB C3 B4 ID JP 1M4 ;«E1TEB IM END 

It EW-ANHEISUNB 

BEEMIBUHB DER PR0»)AHnAUSFlEHRUN6 

lUE CO RET n iHEITEK ZEICHEH? -> ZIHH£CK, FEHLER 

IDAF F5 PUSH AF ;FLA6 A>0 lEHO) RETTEN 

IDIO tt BB 41 CALL Z,41BB 

1DI3 Fl POP AF JEM UIEDER ZURUECK 

IBM 23 E6 40 LQ (40E6I,HL ;AKTUEU£1I POIItTER ABSPEICHERR 

in? 21 13 40 LD HL.40SS iSTRHeZHISCHEHSPEICHER LOESCHEM 



IMWI £1 BO TV Ul m.jlVIM 

1DBA22B3 40 LD (4i)B3),HL 

IDBB 31 Fi FF LD HL.FFFi 



AHSPRUH6 BEI BREAK IH 1W>UT 

(IDBE fh FF OR FF ;FLA8 A>FF [BREAK IH INPUT)! 

IDCO CI POP BC [RUECKSPRUMADRESSE EHTFERNEN 

tDCl 2A A2 40 LD HL,<40A2) ;AKTUELU ZNR HACH HI 

im ES PUSH HL (UNS RETTEH 

IDCS F3 PUSH AF |FLAG RETTEH 

1DC6 7D LD A,L ;AKTUELLE ZNR ' FFFP7 

1DC7 A4 AHD H i(DIREKTHODE) 

1DC8 3C INC A 

1DC9 2S 09 JR Z,1DD4 ;JA 

lOCB 22 F5 40 LD (40F5),HL ;I€IN, CONT-IRR 

IDCE 2A E& 40 LD HL,(40E6) ;UHD COHTPOIHTER ABS?EICHERH 

IDDl 22 F7 40 LD 14W7),HL 

1DD4 CD 8B 03 CALL 038B ;AUS6AK-FLAe AUF DISPLAY, mt CR, HEHN NQETI8 AUF DRUCKER 

1DD7 CD F9 20 CALL 20F9 jCR AUF BILDSUiIRK, HEHH NOETIS 

IDDA Fl POP AF ;FLA6 ZURUECK 

IDDB 21 30 19 LD HL,1930 ;ZEI6ER AUF TEXT 'BREAK' 

-IDDE C2 Oi lA JP NZ,lAOi jBREAK (AUCH IN INPUT) -> 'BREAK IN ' ZNR AUS6EBEH UHD ZUR f^UJPTSCHLEIFE 

IDEl C3 18 lA JP 1A18 ;END? -> OIREKT ZUR HAUPTSCHLEIFE 

'It CDNT-AWeiSUNG 

HIEDERAUFNAHHE DER PROfiRAlMAUSFUEHRUHB HACH BREAK ODER ERROR 

1DE4 2A F7 40 LD HL.(40F7) ,'CQHT-POIKTER LADEN 

1DE7 7C LD A,H ;» 00007 

1DE8 BS OR L )(D.H. KEINE UHTERBRECHUN6 ODER FORTFUEHRUM NICHT flOEGLICH) 

1DE9 IE 20 LD E,20 ;CH-ERRtH1-C0DE HACH E 

IDEB CA A2 19 JP Z.19AZ |JA, CN-ERROR 

IDEE EB EI K,VL ;P01hTER NACH DE . 

lOEF 2A F5 40 LD HL, (40FS) iCOHT-Ztffl 

1DF2 22 A2 40 LD (4M2),W. ;ALS AKTUELLE ZNR AB»>EICHERN 

IDFS EB EI DE.HL iPDINTER ZURUECK NACH HL 

1DF6 C9 RET 



tt TRON-AHHEISUHe 
TRACE'FUHKTIDH AN 
1DF7 3E Af LD A,AF jTRACEFLAB = AF 

tt TR0FF-AMCISUX6 
TRACE-FUHKTION AUS 

tlSFB AF lOft A ;TRACEFLA6 > 0) 

1DF9 32 IB 41 LD <411B),A iTRACEFLA8 ABSPEIOCRN 

IDFC C9 RET 

IDFD Fl POP AF ;N, V. 

IDFE £1 POP HL 

IDFF C9 RET 



tl DEF3TR-AWEISUN0 

STRINBVMIABLEH DEFINIEREH 
lEOO IE 03 LD E,03 [TYPCODE » STRING 

1E02 01 IE 02 LD BC,021E 

tt DEFINT-AHNEISUMS 

INTEBERVARIABLEN DEFINIEREN 
(1E03 IE 02 LD E,02 iTVPCODE ' UTESER) 

lEOS 01 IE 04 LD BC,041E 
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It KFSHB-AMIElSUNe 

SIWieVMIABLEH DEFIKIEREH 

IIEOA IE 04 LD E.04 iTVPGDK ' SINfiLI) 

1E08 01 IE 08 LD BC.OSIE 

tl DEFDBL-AIWEISUH6 

DffllBLEVARIltKEII DEFINIEREK 

UEM IE 08 LD E,08 ;TYPCODE = DOUBLE) 

lEOB CI 3B IE CALL 1E3D ;PDIHTER MJF BUCHSTME? 

lEOE 01 97 19 LD BC,1997 ;St(-EiMfl-ftDfiESSE REHEN 

lElI C5 PU5H BC 

1E12 08 RET C gNEIH, SH-Ef)f)DR 

1E13 U 41 SUB 41 ;STElLuH6 IH ALPHABET ERdlTTELK 

lEtS 4F LD C,A jNACH C UHD S 

lEli 47 LD B A 



1E17 D7 RST ij 

lElB FE CE CP CE 

lElAZO 09 JR )IZ,1E25 

lElC D7 fiST 10 



HAECHSTES ZEICHEN 
1='-' -TOKEN? 
NEIH, KITER 
iHAECHSTES ZEICHEH 
BUCHSTABE? 



lElD CD 3D IE CALL l£a 

1E20 DB RET C jHEIH, SN-ERRDR 

1E31 Di 41 SUB 41 (STELLUN6 IH ALPHABET 

1E23 47 LD B,A ;HACH B 

1E24 D7 RST 10 jNAECHSTES ZEICHEN 

IE2fi li 5UI ^'' I2.WCHSTABE IH ALPHABET VOR 1.? 

IE27 D8 RET C (JA, SH-ERROR 

E28 JC IHC A DlfFERENZ M NACH ft 

M 1} .. . " 'SPt.HL jPDINTER RETTEH, SN-ADRESSE AUS STACK ENTFERHEN 

1E2A 21 01 41 LD HL,4loi {TyPCODETABAHFAlifi NKH HL 

ff^ ^k °^ ^^ ^'^ ;STEaUHG B£B 1.BUCH8TABEH ADDIEREN 

1E2F 09 ADD HL.BC 

fEM 73 LD (HL),E jTYPCODE IN TABELLE SCHREIBEH 

1E31 23 IK HL [ZEIBER IK. 

1E32 3D DEC A jFERTIS? 

1E33 20FB JR NZ,lE3e jNEIN, KITER 

1E35 El POP HL ;P0INTER ZURUECK 

lE3i 7E LD A.IHL) jZEICHEM LABEH 

1E37 FE 2C CP 2E j.'/? 

1E39 CO RET NZ -NElN, FERTIB 

1E3A D7 RST 10 ;MEniSTES ZEICHEN 

1E3B 18 CE JR lEOB ]K1TER 

UP LETTER (AFl 

TESTET W ZEICHEN EIH BUCHSTABE 

ItU.iZEI6ER AUF ZU UNTERSUCHENDES ZEICtSN 

a:KNN BUCHSTABE CV-0, SOKST CY<1 

tE3B 7E LD A.IHL) jZEICHEN LADEN 

lEJE FE 41 CP 41 ■< 'A'? 

IE40 D8 RET C jjfl, FERTIB 

1E41 FE5B CP H ■<- 'Z'? -> CLl 

1E43 3F CCF jCY MBPLEHENTIEREN 

1E44 C9 RET 



UP INTEXP (flF,BC,DE,HL"P) 

AUSMUCK AU^RTEN UND BANZZAttLIBEN WRT « 32768D) ERIIITTEIJ 

I:(HLtl)..=TEn 

0iDE=ER6EBNIS 

iNAECHSTES ZEIUEN 

iAUSDRUCK AUSKRTEN, GANZZAHLIBEH KRT KACH DE, > 32767B? 

;NEIN, FERTIG 

;FC-ERROR-CODE NACH E 
;ZUR OROR-flOUTIME 



1E4S D7 
1E46 CD 02 2B 
1E49 FO 


RST 10 

CALL 2B02 
RET P 


1E4A IE 08 

1E4C C3 A2 19 


FC-ERRDR 
LD E.OB 
JP 19A2 



UP 



KCLM (AF H HL'PI 

STRIN6 IN Z^lWhDELH (GANZE ZAHL < 65530D) 

li(HL)..=STRIN6 



DiDE'ZAHL 



lE^F 7E LD A.fHLl ; ZEICHEN LADEN 

1E50 FE 2E CP 2E U' ."> 

1ES2 £B £1 DE,HL gPOIH^ NACH K 

1E53 2A EC 40 LD HL,I4<»EC) I'.'-ZNR NACH HL 

?l^ ^? ™ .. " ^1*^ IPOIHTER m '.'-ZHR VERTAUSCHEN 

IS! a ^^ '^ '^ ^j'"*^^ S"l NAECHSTES ZEICHEH UND FERTIG 

|M 2B DEC Hi POINTER ZUftUECK 

1E5B n 00 00 LD DE,0000 iZAHL = 4 

lESE D7 RST 10 ;NAECHSTES ZEICHEH, ZIFFER? 
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1E5F DO RET NC iHEIN, FERTI6 

lEM E5 PUSH HL iPOIBTH RETTM 

lE&l FS PUSH AF tZEICtCN RTTEH 

1E62 21 98 19 LB HL,1998 |ZM. > 19«? 

lEU OF RST IB )(I.H. ZAHL t lOD > 65329D) 

lEU M 97 19 JP C,in7 jJA, SM-ERROR 

1EA9 U LI H,B -ZAtlL HACH HL 

lEMU LD L.E 

1E» 19 ADO HL,DE ;HL > 4 t ZAHL 

lEU 29 ADD HL.HL 

lEU 19 ADD HL,DE ;HL < S t ZAHL 

1E6E 29 AM HLHL ;HL :> lOD t ZML 

lEAF Fl POP AT iZEICKH IBWECi: 

1E70 U 10 SUB 30 )-'0' NACH K 

1E72SF U) E,A 

1E73 16 00 LD D.OO 

1E75 19 ADD HL.DE jAUF lOD t lAHL AHIEREH 

1E7* El EI DE.HL glAHL = lOD t ZANL ♦ ZIFFEfi 

1E77 El POP HL iPOIHTER ZURUECX 

1E7B 18 £4 JR 1E5E {WECHSTE ZIFFER 

tt aEAR-AMEISUW 

VARIAKEM LK5CHEH U» 5TRIN6SPACE DEFINIEREN 

1E7A CA 61 II JP Z.lUl ;ICEIHE HEITEREH ZEICHEH? --> SPRUW IN KM, VAR1A6LEN LOESCHEH 

1E7S CD 46 IE CALL 1E46 )AUSMH)CK AUSHERTEN, 6AHZZAHLI6ES ERSESMIS « S276BD} MCH DE 

lEBO 21 SEC HL |POIHTER DEC. 

1E81 D7 RST 10 gMECHSTES ZEICHEIt, ANHE1SUN6SENDE? 

1EB2 CO RET HI [KIK, ZUWECK, FEHLfR 

1E83 E5 PUSH HL iPOIHtER RETTEll 

1EB4 2A Bl 40 LD HL, 14011) {RAHEnE NACH HL 

1E87 7D LD A,L )- AR8UKHT HACK HL 

1EB8 93 SUfi E ;ER6IBT NEUEH STRINBSPACEANFAM - 1 

1ES9 SF LD E,A ;UIITERIAUF? 

lESA 7C LO A,H 

1E88 9A SBC 

lEK S7 LO D,A 

lEBS M 7A 19 JP C,197A ;JA. HKRRDft 

1E90 2A F9 40 LD hL,(40F9> |VMtTAIANFAN6 HACK HL 

1E93 01 26 00 LD K,002S i+ 28 

1E96 09 ADD HL,K 

1E97 IF RST 18 ;< NEUER STRIWSPACEAWAH6 - I ? 

1E98 D2 7A 19 JP NC,197A ;HEIK, W-ERROR 

1E9I EB El DE.HL ;NEUEN STR1H6SPACEANFAN6 - 1 AKPEICHERH 

1E9C 22 AO 40 LD UMO},HL 

1E9F E) POP HL iPDIMTER ZURUECK 

lEAO C3 61 II JP 1B61 ;SPRUN6 IN MEN 

tt RUH-AHHEISUttS 
PROGRMttl STARTEN 

1EA3 CA 5D IB JP Z.IIU ;KE1HE HEITEREH ZEICHEH? --> SPRUH6 l£BER NEH 

lEAi CD C7 41 CALL 41C7 

1EA9 CI 61 IB CALL 1161 {VARIABLEH LOESCHEN 

lEAC 01 IE ID LD K.IOIE )RUECKSPRUHeADRE3SE NACH IC (DURCH NEH VDfl STACK ENTFERHT) 

lEAf IB 10 JR lEfil _ JKITER 

It 6DSUB-AMIEISUH6 
UNTERPROBRAIWUMUF 

lEBl OE 03 LD C,03 ;TESTEN, OB 6 BYTES FftEI 

1EB3 CI 63 19 CALL 1963 

1EB6 CI POP BC ;RUECKSPRtM6AIRESSE EHTFERIEH 

1EB7 ES PUSH HL ; POINTER RETTEN FUEft RETURN 

lEBS ES PUSH HL ;POIHTER RETTEH 

1EI9 2A A2 40 LD HL, (40A2) jRIT AKTUELLER ZNR 

lEBC E3 EI (SP),HL jVERTAUSCHEN 

IHD 3E 91 LD fl,91 ,91 AL8 FLA6 FUER BDSUB 

lEBF FS PUSH AF ;AUF STACK 

lECO 33 IHC SP jLSB EHTFERNEN 

lECl C5 PUSH BC ;f)UECK5PRUHBADRESSE HIEDER STZEH 

It fi0T0*AmEISUH6 
UNBEDIHGTER SPRUH6 

tEC2 CD M IE CALL lEH jSPRUHB-ZNR BESTIHREH 

1EC5 CD 07 IF CALL 1F07 |EHDE DER ZEILE SUCHEN 

lECe ES PUSH VL jPOINTER RETTEN 

1EC9 2A A2 40 LI HL,I40A2) lAKTUELLE IHR HKH HL 

lECC DF RST 18 lAKTUEUE ZHR < 8PRUNB-ZHR? 

lECD Et POP HL ;POIHTeR AUF HAECHSTE ZEILE NACH HL 

lECE 23 IHC HL 

lECF DC 2F IB CALL C,1B2F jJA, SPRUN6ZEILE VON HAECHSTER ZEILE AN SUCHEN 
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lEH D4 2C IB CALL l*C,Ifl2C iKIH SPfiUKSlElLE VW P(t06RflW«*FWffi AH SUCHEH 

lEM 60 LD H,B (ADRESSE KR SPRUK6ZEILE NACH HL 

lEW i9 LD L.C 

Ml S KC HL jPOIHTEH VOR SPfiUNfilEILE 

1EI8 D8 RET C ;ZE1LE VORHANDEN? --> MEITER 

UL-ERRDR 

WH i\ ?^ .» ^Jt h^^ jUL-EfiROfi-CODE HAEH E 

1ED6 C3 A2 I? JP ^ l^ft2 ;2UR ERfiOR-ftOUIIME 

It KTURtt-AWtEISUXE 

RUECKSPRUN6 VON UNTERPRD6RAM 

M f? rr ."F U^ '*"E''f ^EICHEM? --> ZUfiUECK. FEHLER 

IeK CD 36 19 MLL \kZ !"«'="STE MTEN VOH STACK (FOli-DATES UEMRGEHEH) 

lilt ^! .„ .. '■" SP.HL (STACK KU INITIAL I SIEREK 

1EE5 22 E8 40 LB (4K8),HL 

IS! ^1 l\ ^^ '^ fO'^TEN VON eOStlfi-AUFRUF? 

f|»lE04 LD E,04 ;R6-ERRDR-CQDE HACH E 

EEC C2 A2 19 JP Ni,l?fl2 jNEIN, Rfi-ERROfi 

}Ul II .. .. "f* * i^* ^"WEEt: m STACK 

EFO 22 A2 40 LD {40A2),HL ;ALS AKTUELLE ZHR ABSPEICHERN 

1EF3 23 INC HL :«FFFF? 

1EF4 7C LD A,H „DIKKT«ODE. 

1EF6 20 07 JR NZ.IEFF sNEIN 

lEFB 3A DD 40 LD A,(40DD) sFLAS 6EKTZT? 

lEFB B7 HR A 

JIf? S? .'I ,'.* ■"* *'^1'*'8 )JA, ZlfR HAUPTSCHLEIFE 

WI, U '^ ^^ il "^I'^IE ;RU6EKSMtUN6AWffiSSE NACH HL 

1F03 JE LD '"*" '"'^ """^ VERTAUSCHEM 

UF04 El r?"* "^ _ IMINTER ZUftUECK) 

UP SEOS (AF,K,D,HL«P) 

II DATA-AHHElSUNS 

SUCHT EKK DER ANHEISUKG 
lil 
Oil 

1F05 01 3A OE LD BC,0E3fl iTRENNZEICHEBl='t' 

1F08 00 MP 



UP SEDL (AF,BC,D,HL«P) 

It ELSE-ANKISUNG 

SUCHT ZEILENEHDE 
I:/ 
Oi/ 

\iT.. ^ ™ '■'* '^>'^ iTRENNZEIEHEIll'O aElLEHENDEI) 

1F09 06 00 LD B.OO ;TRENN2EICHEN2*0 (ZEILENENDE) 

'FOB 79 LD A,C jTRENMZEICHENl tMD 2 VERTAOSCHEH 

IFOB 47 LD b'a 

IFW B7 OR "''*' !^£If:^tEN LAOEN, « ZEILENENDE? 

IFIO CB RET Z ;JA, FERTIB 

IFll BB CP B ;= Tffi»IZEICHEN2 

1FI2 CB RET Z ;JA, FERTIB 

IF 3 23 IK HL POINTER INC. 

1F14 FE 22 CP 22 ■= ■"^ 

lcl*o S? ^J ^L It'™ ''V^> TWKNZEiCffiN VERTAUSCHEN (D.H. NUR NOCH ZEILENEHDE ERKENNEN) 

iriB US » SUI BF :IF-TOKEH? 

IFIA 20 F2 JR NZ.IFOE ;NEIN, NEITER 

IflC W CP B ;HEHN NICHT IN STRIK ODER NACH ELSE CY-1 

IFID HA ADC D j reRSCHACHTELUNfiSZAEHLER INC. 

IflE 57 LD D.ft 

IFIF IB ED JR ifOE jNEITER 

tt LET-AHUEISUN6 
NERTZUNEISUNG 

IK!^?^"^* ^*-'- 2"" fZUBEISUNSSVARIABLE IN VARTABELLE SUCKEN 

1F24 CF RST 08 ; SVNTAICHECK! POINTER flUF '="> 

1F25 D5 

1F26EB EX M.HL ;VARTABADRESSE ABSPEICHERN 

1F27 22 DF 40 LD (40DF},HL 

IF2A EB EH DE.HL 

1F2BD5 PUSH BE iWARTABAWESSE RETTEN 

1F2C E7 RST 20 ;TYP TESTEN 

1F2D F5 PUSH AF ;Typ-FLA6 RETTEN 

1F2E CD 37 23 CALL 2337 jAUSDRUCK fitiSKRTEB 
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1F31 Fl POP flf iTYP-FLM ZURUECK 

1F33 ES EI (SP),HL ;POINTER RETTEH, VARTABADRESSE NACH HL 

tF33 a 03 ADD 03 ;TYPCDDE ERRECHKN 

1F35 a 19 28 CALL 2819 jERSEHlIS DES AUSDRUCKES IN RICHTIBEN TYP UnUANKLN 

lF3a CD 03 OA CALL 0A03 iI-ADf)ESSE IN AIHAEH616KEIT VOH TYP NACH K 

1F3I E5 PUSH HL ;VARTABABRESSE RETTEN 

1F3C: 20 28 JR n,\Hb ;SPftUW HEfW HICHT STRIH6 

STRINBZUHEI3UNE 

1F3E 2A 21 41 LD HL, 14121) ;STRIN6ZEI6ER AUS I-REBlSTEf) LADEN 

1F41 a PUSH HL iRETTEN 

1F42 23 IK HL ;STfiJH6ADRESS LADED 

1F43SE LO E,(HL) ;(LSB) 

1F44 23 IK HL 

1F45S6 Lfi D,(HLI }IRS8) 

tF4& 2A A4 40 LD HL,I40A4] )STRIH6 HEDEB IH PROeRAflHTEXT HOCH IN STRIN6SPACE? 

1F49 DF R3T IB 

1F4A 30 OE JR HC,1F5A ;JA, STRING IK STRIH8SPACE UEBERNENHEH 

1F4C 2A AO 40 LD HL,(40A0) ;STRIM IH PROBRAHHTEIT? 

1F4F OF RST 18 

IFSO Dl POP SE {STRIHGIEIGER NACH DE ZURUECK 

1F91 30 OF JR NC,1F62 )JA, STRING NICHT IK BTRIHBSPACE tlEBERKHHEN 

1F53 2A F9 40 LD HL,<40F9) ilElBT STRIN6ZEI6ER AUF VARTAB? 

IfVt DF RST 18 

tFS7 30 09 JR NC,1F&2 iKElN, STRING NICHT IH STRIHeSPACE UEBERHEHHEN 

1FS9 3£ Dl LD A.Dl 

USH Dl POP DE jSTftlNGZEISER ZURUECK) 

1F5B CI F5 29 CALL 29F5 ;STRIKG AUS ZtllSCHEKSPEICHER LOESCHEN 

IFU EB EI DE.HL ;STR1N6ZEIGER HACK HL 

IFSF CD 43 28 CALL 2843 ;STR]KS IH STRIK6SPACE UEBERHEHHEN 

lFi2 CD F5 29 CALL 29F5 ;STRING AUS ZHISCHERS-EICHER LOESCHEN 

IFiS E3 EI (SP},HL j VARTADADRESSE KACH HL ZURUECK, ZEI6ER AUF ZNISCKEHSPEICHER RETTEN 

tFU a D3 09 CALL 09D3 ;NEfiT VOH I IK VARTAB UEBERTRABEN 

1F&9 Dl POP DE ;VAfiTABADRESSE ZLRUECK (HUR BEl NtMERISCHEN TYPEK) 

IFiA El POP HL {POINTER ZURUECK 

IFiB C9 RET 



ON-ANNEISUNBEH 
VERZHEISUNBS-ANHEISUfleEN 



IFiC FE 9E CP 9E ;ERR[»)-T0KEH7 

IFU 20 2S JR N2,1F93 ;(£IK 

ON ERROR 

1F70 D7 RST 10 ;HAECHSTES ZEICHEH 

1F71 CF RST 08 jSYHTAICHECK: POINTER fiUF 60TD-TOKEN? 
1F72 8D 

1F73 CD 5A IE CALL lESA ;ZEILENHUMCR lECDIlEREH 

1F76 7A LD A,B :> 0? 

1F77 B3 OR E jiTRAP AUFHEBENI 

1F7B 28 09 JR Z,1F83 [JA 

1F7A CD 2A IB CALL IB2A jZElLE IH PRDBAAIfftTEliT SUCHEN 

1F7D 50 LD D,B ;ZEILENADRESSE NACH DE 

1F7E 59 LD E,C 

1F7F El POP HL jPOINTER ZURUECK 

IFBO D2 09 IE JP HC,1ED9 ;ZE1LE NICHT VOfMWDEK? --> UL-ERRQR 

1F83 EB EX DE.HL ; TRAP-ADRESSE AtSPEICHERN 

1F84 22 FO 40 LD (40FD),HL 

1FB7 EB EX DE,HL 

IFBB DB RET C [ERRQRTRAP KICHT AUFHEKH? -> FERTIG 

1F89 3A F2 40 LD A,(40f2) ]ERRORTRAP SCHOH AUFBETRETEK 

1F8C B7 OR A 

1F8D C8 RET Z )KEIH. FERTI8 

IFBE 3A 9A 40 LD A,(409A) ;ElffiOM:0DE NACH E LADEH 

1F91 5F LD E.A 

1F92 C3 AB 19 JP t9AB ;ZUR ERRORROUTINE 

OK BOTO (BDSUBI 

1F95 CD IC 2B CALL 2B1C ;AUSDRIKK AUSNERTEH, BAHZZAHLI6EN WRT « 2HDI NACH E 

tF98 7E LD A,(HL) }2EICHEK LADEN 

1F99 47 LD B,A tNACH fi 

IF9A FE 91 CP 91 )» BD3UB-T0KEK? 

1F9C 28 03 JR Z.lFAl ;JA 

1F9E CF RST 08 |3VKTAI-C«CKl POINTER AUF 60TO-TOKEH? 
1F9F BD 

IFAO 2B DEC HL |POIHTER DEC. 

IFAl 4B LD C,E gMJHHER DES SPRUN8S NACH E 

1FA2 OD DEC C ;HUHNER - 1, »0? 

1FA3 78 LD A,B jTOKEH MCH A 
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r5i £5 t^. \l ^^ ^'^^^ iJ"! SPRUH6 HIT MECHSTER ZSR DUfiCHFUEHREN 

lFfl7 CD 5B IE CALL lE58 ;2nI) MCODIEftEN 

IFMFE 2C CP 2C jHtilNTER ','? 

J^*^ P2 ., "^^ " !«J"j ^""fKK, FEHLER 

IFflD Ifl F3 JR lFft2 jMlTER 

It RESUnE-AWEISUXe 

RUECKSPRUHfi UDH ERROfi-TRflP 

IFflF 11 F2 40 LD M,40F2 ;I£I6ER AUF TRAP-FLftB 

IFKlfl LD fl.lDEt jIRflP ftUFBETRETEN? 

IFI3 B7 W A 

1FB4 CA M 19 JP l,im jKEIH, RK-ERftOft 

lFi7 3C IIK A A = i 

1FB8 J2 9fl 40 LD (409A1,A iEfiROKDOE LOESCHEK 

IFSB 12 LD (D£),fl iTRAPFLAfi LOESCHEN 

1FBC7E LD A,(HL) jZEICHEM LADEN 

IFBD F£ 87 CP B7 j-NEKT-TDKEN? 

IFBF 28 OC Jfi Z.IFCD jJA 

IFCl CD H IE CALL lESfl ;ZNft KCODIEREH 

ll^i ,^? ."If^ "^ IKIIERE ZEICHEN? --> RUECKSPRUW, FEHLER 

1FC5 7A LD A.D ;ZW) > 0? ' 

IFCi B3 W E 

!K1 ii ^^ '^ ^'* "^'^^ f*'"- I" SOTO-BEFEHL SPRINSEK 

IFCA 3C INC fi jFLflfi LMSCHEM 

IFCB IB 02 JR IFCF [«ITER 

RESUK KIT 

!Sf V. ^'^ '^ iHtfCHSTES ZEICHEB, ZEILENENDE? 

FCE CO RET NZ ;N£II|. lUWECK, FEIILER 

IFCF 2fl E£ 40 LD HL, (40EE) jFEHLERPDINTER LADEM 

1FD2 EB EX DE,a. ;NACH D£ 

1FD3 2A EA 40 LD H1..140EA) jFEHLEH-INR LADEN 

1FD6 22 A2 40 LD 14M2I,HL fALS AKTUELLE ZNfi ABSPEICfSRN 

FD9 EB EI DE.HL ;FEHLERPD INTER itIEDER NACH HL 

FDA CO RET NZ iPESlWE 0? --> FERTlfi 

IFDB 7E LD A,(HL) ;ZEILEKIIM? 

IFDC B7 OR A 

IFDD 20 04 Jfl NZ,1FE3 ;ttEIN 

HE ^T }!^ * JPOINTER AUF ERSTES STATEHENT DEH NAECHSTEN ZEILE 

iftv ^i INC HL 

IFEl 23 IHC HL 

1FE2 23 IHC HL 

IFEJ 23 INC HL 

1FE4 7A LD A,D jRECWtfi JH DIREKTHOK? 

IFES A3 AND E 

1FE6 3C INC A 

\lll 9, '.^n [i ■"* "^■'^ i'*^"'' NAECHSTE ANHEISUNB SUCHEN, FERTIB 

IFEfl 3A DD 40 LD ft.UODD) ;FLA6 BESETZT? 

IFED 3D DEC A 

IFEE CA BE ID JP Z IDBE ;JA, FflOGRAHKAUSFUEHfiUHB BEENDEN 

IFFl C3 05 IF JP 1^05 ;ltttCHST£ AMNEISUNG, FERTIB 

EftfiOR-AWEISUHG 

ERZEUST FEHLER 

Irrt 9^ "^ ^^ ^^> ^^"^ iFEHLERCDDEAUSDRUCK ANALYSIEREH, GANZZAHLIBEH KFT «Z54DI NACH A 

Ittl .^? ^^ **^ tXEITERE ZEICHEN? --> ZURUECK, i^EHLER 

IFFB B7 OR A ;FEHL£RCDDE ' 0? 

1FF9 CA 4A IE JP Z,1E4A ;JA, FC-ERRM 

irrH? ^^ * ;lNtERN£H FEHLERCDDE ERfiECHNEN 

IFFD a7 ADO A 

IFFE 5F LD E.A ;HftCH E 

IFFF FE 2D CP 21) < 20? 

2001 38 02 JR C,2O05 ;JA 

UE-ERfiQR 

2003 IE 2i LD E.Zi ; UE -ERROR -CODE NACH E 

2005 CJ A2 19 JP 1^A2 ;ZUR ERROR-ROUT I ti£ 

tt AUTD-BEFEHL 

AUTOriATISCHE ZEILEWUNflERIERUNG 

2008 11 OA 00 LD D£,OOOA ilNCREHEHT UND ANFANBS-ZHR = lOD (DEj (SP),(SP+1H 

2008 D5 PUSH DE 

If^ ?l \l .r ^^ ^!.2"= i''^'* *'TEREN ZEICHEN? --> ZUR SCHIUSSABFRABE 

200E CD 4F IE CALL lE4F jANFMGSUERT DECODIEREH 

li\l i\ ^" ^h>^ iANFAN6S-ZNfi NACH HL, POINTER NACH D£ 

201| |3 EI (Sh.HL )MFAN6S-ZNR IN STWfc, lOD Ata INCREBENT KACH HL 

20 i II 11 JR {Mb iKEINE HEITEflER ZEICHEN? -> ZUR SCHLUSSAIFRABE 

2015 EB EI DE.HL ;PtJINTER NACH HL 

2014 CF RST oe fSYNATICffiCKi POINTER AUF ',' 
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2017 2C 

2018 El 

2019 2k 
201CEB 
201D28 
30IFCI 
2022 C2 

2025 El 

2026 7C 

2027 IS 

2028 U 
202122 
202E 32 

2031 El 

2032 22 

2033 CI 
2036 C3 



E4 40 

Oi 

SA IE 
97 19 



4A IE 
E4 40 
El 40 

E2 40 

33 lA 



2039 CD 37 23 
203C7E 
2031 FE 2C 
203F CC 78 ID 
2042 FE CA 
2044 CC 78 10 

2047 21 

2048 ES 

2049 CO 94 09 
204CE1 

204D 28 07 



204F D7 
20» DA C2 IE 
2033 C3 5F ID 



205& 1& 01 
2038 CD 05 IF 
205BB7 
203CC8 
205D D7 
205EFE 95 
2040 20 F6 

2042 15 

2043 20 F3 
2045 la EB 



2047 3E 01 
2049 32 9C 40 
204C C3 91 20 



204F CI CA 41 
2072 FE 40 
2074 20 19 



2076 CD 
2079 FE 
207B D2 
207E E5 
207F 21 
2082 19 
20S3 22 
2084 71 
2087 E4 
20S9 32 
20SCE1 
20BD CF 
208E2C 
20BFFE 
2091 20 

2093 CD 

2094 3E 



01 21 

04 
4A IE 

00 3C 

20 40 

3F 
A6 40 



23 
08 

B4 02 
80 



EX 

LD 

EX 

JR 

CALL 

JP 

EX 

LD 

OR 

JP 

LD 

LD 

POP 

LD 

PW 

JP 



DE,HL 

HL, (40E4> 

DE.KL 

1,2025 

lESA 

«,1997 

DE.HL 

A,H 

Z,1E4A 

(40E4),I1 

f40En,A 

HL 

(40E2),HL 

DC 

1A33 



LD 

CP 

CALL 

CP 

CALL 

DEC 

PUSH 

CALL 

POP 

JR 



THEN 
RST 
JP 
JP 



10 

C,1EC2 
1»F 



ELSE 

LD 

CALL 

mt 

RET 
RST 

CP 

JA 

DEC 

JR 

JR 



D.Ol 
1F05 
A 

I 

10 

95 

NZ,205e 

D 

RI,205B 

204F 



;PD INTER NACH of 

;ALTEN IHCREHEMT NACH DE UNO POINTER NACH HL ZtfRUECK 

jKEINE KEITEREN ZEICHEN? -> ZUR SCHLOSSABFRASE 
lIHCREnENT DECDIIEREN 
iieiTERE ZEICHEM? --> SN-ERRDR 
ilKREHENT NACH HL 
flNCREHEHT > 0? 

)JA, PC-ERROR 
; INCREMENT AISPEICHERH 
)AUT0-FLA6 SETZEN 
lAHFANGS-ZNR NACH HL 
(UNI ASSPEICHERH 
iRUECtCSPRUNBADRESSE ENFERNEH 
;ZUR HAUPTSCW.EIFE 



IF-ANKISUNG 
BEDIN6TE AHHEISUN6 
CALL 2337 

A.IM.} 

2t 

Z,1D78 

CA 

Z,1D78 

HL 

HL 

0994 

HL 

Z,2054 



;fiEDIN6UK6SAUSDRUCK AUHEATEN 

;ZEICHEN LADEN 

i"','? 

jJA, HAECHGTES ZEICHEN 

1 -THEN-TOKEN? 

|JA, HAECKSTES ZEICHEN 

] POINTED DEC. 

I UNO 8ETTEN 

tER6EMI8 = 0? (BEOINeUNB NJCHT ERFUELLT) 

.'POINTER ZURUECK 

;JA, ELSE 



jNAECHSTES ZEICHEN, ZIFFER? 

;JA. SPRUN6 AOSFUEKREN 

jHElN, NAECHSTE AHHEISUN6 AUSFUEHREN 



LPRIKT-ANHEISUNG 
AUS8ABE AUF DRUCKER 
LD A, 01 
LD l409C),A 
JP 209B 



IVERSCHACHTELUNGSZAEHLER ■ 1 

IJWOBTE ANNEISWB SUCHEH, HENH IF VERSCHACHTELUN6SZ. INC, 

iFERTIfi, KEIN ELSE 

;HAECHSTES ZEICHEN 

; ELSE-TOKEN? 

;NEIN, HEITER SUCHEN 

;RICHTI6ES ELSE? 

{NEIN, KITER SUCHEN 

iJA, meENDE ANNEIS1JN6 NIE THEN DEHANDELN 



;AUS8ABE-FLAB AUF DRUCKER SETZEH 
;UND IN PRINT SPRIN6EN 



PRINT-ANHEISUN6 

AUS6ADE AUF BILDSCHIRH 

CALL 41CA 

CP 40 iNAECHSTES ZEICHEN 

JR NZ,20eF ;NEIN 



KLAMEfiAEFE? 



AT AUSF1£HREN 
CALL 2101 



CP 

JP 

PUSH 

LD 

ADD 

LD 

LD 

AND 

LD 

POP 

RST 

CP 
JR 
CALL 
LD 



04 

NC,1E4A 

HL 

HL,3C00 

IH.,DE 

14020), HL 

¥ 

(40A4),A 

HL 
OS 

23 

NZ,2096 
02B4 
A,80 



)™ITWJ*3»^^K^AUS«RTEN, SAHZZAHLIBEH KRT K 3274BD) HflCH DE, flSB NACH A 

1 JA. FC-ERROR 

{POINTER RETTEN 

;BILDSCHIRHADRESSE NACH HL 

iPOSITIOH ADOIEREN 

;L!ND SUfflE ALS NEUE CURSORADRESSE APSPEICHERN 

iPOSTION DES CURSORS IN DER ZEILE ERHITTELN 

;LS8 HDD 44D NACH A 

;Um ALS NEUE CURSDRPOSITDN ABSPEICHERN 

IPOINTER ZURUECK 

jSVNTAXCHECKi POINTER AUF ','? 

;CASSETTENAUSMk? 

(NEIN, KITER 

;CA93ETTEWIEC0RDER EINSCHALTEN UND HEADER AUFZEICHHEN 

jAl)S8A8E-FLA6 AUF CASSETTE 
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209B 32 9C 40 


LD 


20?B 2B 


DEC 


2WC D7 


RST 


Z09D CC FE 20 


CALL 


2M0 CA 69 21 


JP 


2M3 FE BF 


CP 


20A5 CA BD 2C 


JP 


20A8 FE K 


CP 


20AA CA 37 21 


JP 


20ADE5 


PUSH 


20AE FE 2C 


CP 


20B0 CA M 21 


JP 


20B3 FE 3B 


CP 


»fi5 CA hA 21 


JP 


2018 CI 


POP 


20M CD 37 23 


CALL 


20K ES 


PUSH 


20K)E7 


RST 


20BE 2B 32 


JR 


2OC0 CD BD OF 


CALL 


20C3 CD 65 2B 


CALL 


20C6 CO CD 41 


CALL 


20C9 2A 21 41 


LD 


20CC 3A 9C 40 


LD 


20CF B7 


OR 


20H FA E9 20 


JP 


20D3 28 08 


Jfi 


20D5 3A 9B 40 


LD 


20DB 86 


ADD 


20D9 FE 84 


CP 


20DB 18 09 


JR 


20BS 3A ?D 40 


LD 


20E0 47 


LD 


20E1 3A A6 40 


LD 


20E4 86 


ADD 


20E5 BB 


CP 


20E6 D4 FE 20 


CALL 


20E9 CD AA 28 


CALL 


2DEC 3E 20 


LD 


20EE CD 2A 03 


CALL 


20F1 B7 


OR 


20F2CC AA 28 


CALL 


20F5 El 


POP 


20F6 C3 9B 20 


JP 



20F9 3A A6 40 
20FCfl7 
20FD C6 



20FE IE OD 
2100 CD 2ft 03 
2103 CD DO 41 

2106 AF 

2107 C9 



2108 CB 
210B 3A 
210E B7 
21 OF F2 
2112 3£ 
2114 CD 
2117 18 

2119 28 
21 IB 3A 
21 IE FE 

2120 C3 
2123 3ft 

2126 47 

2127 3A 



D3 41 

9C 40 

19 21 

2C 

2A 03 
48 
08 

9B 40 
70 

2B 21 
9E 40 

A6 40 



(409CI,A 

HL 

10 

I,20FE 

Z,2169 

BF 

Z,2CBD 

Z,2137 

HL 

2C 

7,2108 

3B 

Z,2164 

BC 

2337 

HL 

20 

Z,20F2 

OFBD 

2865 

41CD 

fl,(4121) 

A, 14090) 

ft 

fl,20E9 

Z,20DD 

A, (40981 

(HL> 

B4 

20E6 

A,(409D1 

B.A 

A, (40A6) 

IHL) 

B 

NC,20FE 

2BAA 

A, 20 

032A 

A 

Z,2BAA 

HL 

209B 



;PDIHTER DEC. 

iUECHSTES ZEICHEN, ANHEISUHfiSENDE? 

jJA, CR AUS6EBEM 

;UHD FERTIB 

\= USIW-TOKEN? 



tJA, FOfWTIERTE ftUSSABE 

]' TAB-TKEK? 

)JA 

IPOINTER RETTEN 

IjA.'zUR KAECHSTEH TAS-PDSItlON 



[JA, KITEfi, HAECKSTES ZEICHEN 

; POINTER mn BC 

;AUSMUCK AUSKRTEK 

:PQ1)ITER RETTEH 

;ER6E>NISTYP TESTEH 

{STRIN6? -> 5PRUNS 

;ZAHLE)t DER DREI HlMfllSCHEN T^EN IN STRIN6S tMHANDELd 

tSTRING IH ZUISCtSHSPEIUiER UND X UEBERNEt«EN 

iSTRIH6ZEI&EN ftUS I NACH VH 

;AUS6ABE-FUffi LADEN 

I UND TESTEN 

iCASSEHE? -> KEINE FDRHATIERUNG 

[DISPLAY? --> SPRUNB 

iHUERDE ZAU UEBER ZEILENEHI^ SEDRUCKT? 

; (DRUaCKOPFPOSITlON + STRINSLAENSE >= ZEILENLftENK (132D)) 

tWITER HIE >EI DISPIAT 
jZ£ILEM.A£N6E NACH B 

)1CURS0f)P0SITIDH * STRIHOLAEttSE >' ZEILEW.AEN6E (64D)) 



;JA, CR AUS6EBEN 
jSTRlNG AUSGEBEN 
;DANACH NOCH EIH LEERIEICHEK AUS6EBEN 

)Z^, DADIT NAECHSTER BEFEHL UEBER SPRUN6EH 
:STRiH6 AU^MtUCKEN, KENN ER6EBNIS STRING WAR 
[POINTER ZUtUECK 
jKITER 



UP IfflTL (ftF»00441 

CR AUSGEBEN, KHN CUROSR NICHT IN POSTIDN 
Ii(409C)MUS6Ak-FLft6 

(40A6)>CURS0RP0S1TI0N 
D:/ 

LD A,(40A6) iCURSORPOSTION NACH A 

OR A ;= 0? 

RET 2 ;JA, FERTIS 



UP 


CR (AF-0044) 




CR AUSGEBEN 




l!(409C)=AllSGftK-FLAG 




0:/ 






LD 


A.OD :CR ftUSGEBEN 
032A 




CALL 




CALL 


41D0 




IDfi 


A iftF = 0044 




RET 





'j'-AUSNERTEH 
CALL 41 D3 



LD 

OR 

JP 

LD 

CALL 

JR 

JR 

LD 

CP 

JP 

LD 

LD 

LD 



A,I409C) 
A 

P,2119 
A,2E 

ozia 

2164 

Z,2123 

A,(409B) 

70 

2128 

A,(409E) 

B,A 

A, (40ft6) 



jAUSGABE-FLAG TESTEN 

jDISPLAV ODER PRINTER? 

;JA 

;CASSETTE} ',' AUFZEICHKN 

; HE ITER 

;DISPLfty? --> SPRUNG 

iDRUCKKOPFPOSITlON < LETZTE TAB-POSITION (1120) 

;KITER HIE DISPLAY 

[LETZTE TABPOSITIM NACH B (4aD) 

jCURSIWPOSITIOH < LETZTE TAB-POSITION? 
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2m Be 

21 2B D4 F£ 20 
212E 30 34 
2130 D& 10 
2132 30 FC 
213* 2F 
2135 18 23 



2137 CD IB 2B 
21U Ei 3F 
21 3C 5F 
Z13SCF 
21 IE 29 
21 3F 21 

2140 E3 

2141 CD D3 41 
2144 3fl K 40 

2147 17 

2148 FA 4A IE 
214B CA 53 21 
214E U 9B 40 
2151 IB 03 
2153 3A U 40 

21 56 2F 

2157 83 

2158 30 OA 
21 SA 3C 
215B 47 
215C 3E 20 

21 5E CD 2A 03 

2161 05 

2162 20 fH 



2164 El 

2165 D7 

2166 C3 AO 20 



2169 3fl 9C 40 
21bC B7 

2160 FC FB 01 

2170 AF 

2171 32 9C 40 
2174 CD BE 41 
2177 C9 



CP 

CALL 

JR 

SUB 

JR 

CPL 

JR 



»C,20FE 
NC,2164 
10 
K,2130 

21SA 



jHEIH, CR AUS8ESEH 

lUND iKITER 

iCURSOftPaSTION - lU BIS KLEIKER 

lEiteiBT ANZAHL DEf) EIH2UFUE6ENDEH ' 
jEHTSPRECHENDE AHIAHL AUSSEBEH 



- 1 



TA8-AUS«ERTEN 

CALL 2B1B 



MD 
LD 

fiST 

SEC 
PUSH 
CALL 
LD 

OR 

JP 

JP 

LD 

JR 

LD 

CPL 

ADD 

Jf) 

IK 

LD 

LD 

CALL 

DEC 

JR 



3F 
E<A 



HL 
HL 
41D3 

A, (409CI 

H,1£4A 
Z,2153 
A, (4091) 
2156 
A, (40A6) 

E 

NC,2164 

A 

B,A 

A, 20 

032A 

I 

NI,215E 



iARGUHEHTAUSDRUCK AUSHERTEN, 6AHZZAHLI6EN HEOT K 2S6D} HACN A 

iflCD 641) 

IMCHE 

(SYBTAICHECKt POIMTER AUF 'J'? 

I 
IPOIHTER KC. 
;UW RETT» 

;AUS6ABE-FLA6 TESTEH 

i CASSETTE? --> FC-ERRflfi 

iDISPLAY? --> SPRLMG 

;WUCKERi DRUCEKOPFPOSITJDN LASEN 

{HEITER VIE DISPLAY 

(DISPLAYi CURSORfOSITIDII LADEN 

;TAfiAR6 WD 64D - CURSORPOS - 1 HACH A, < 0? 

;JA, HE ITER 

it i 

)ER6IIT ANZAM. 9£R LEEftZEIOCH INACH B) 

jLEERZEICHEH HACH A 

;IEERZE1CHEN AtfS6EBEX 

i PERT IB? 

;HEIN, HEITER 



HAECHSTER PfilllT-UHTERftUSDRUCK 
POP HL iPOIHTER ZURIKCK 

fiST 10 ;HAECHSTES ZEICHEH 

JP 20AO jHEITEfi 



EW)ABFRA6E 

LD A, (409C) 



OR 

CALL 

IQR 

LD 

CALL 

RET 



A 
H,01F8 

1409C),A 
41BE 



TEXT 
2178 3F 52 45 44 4F OD 00 



;AUS6ABe-FLA8 TESTER 

(CASSETTE? "> CASSETTE AUS 
jAUS&ABE-FLAG AUF DISPLAY 



?REDa.. 



217F 3A DE 40 

2182 B7 

2183 C2 91 19 
2186 3A A9 40 
21B9 B7 

218A IE 2A 
21K CA A2 19 
218F CI 
2190 21 78 21 
2193 CD A7 28 
2196 2A E6 40 
2199 C9 



FEKLER IN INPUT 



LD 

QR 

JP 

LD 

OR 

LD 

JP 

POP 

LD 

CALL 

LD 

RET 



A, l40DEt 

HZ, mi 

A, (40A9) 

A 

E,2A 

Z,19A2 

BC 

HL.217B 

28A7 

HL, (40E6) 



fDATAFLAfi BESETZT? 

;JA, 9(-ERR0R IN DATA-AHHEISUH6 
jCASSETTEHINPUT? 

;FD-ERRt]R-CODE NACH E 

iJA, FO-ERRM 

;TASTATURII1PUT: flUFFEflZ. NACH BC 

IZEIGER AUF TEXT '?REOO' 

;'?REDQ' AUS6EBEN 

jMTUELLEN POINTER NKK HL 

;Zlttl£CK, INPUT NEU BEGINKN 



219A CD 28 28 
21 9B 7E 

21 9E CD D6 41 

21A1 D6 23 

31 A3 32 A9 40 
21A6 7E 

21A7 20 20 



It INPUT-ANNE I SUNG 
EIHGABE-ANHEISUNe 
CALL 2B28 
A,IHL) 
41B6 
23 

140AVI,A 
A,(HL) 
HZ,21C9 



LD 

CALL 

SUB 

LD 

LD 

JR 



jDlREKTHBDE? -> ID-Efi«Nl 
iZEICHEN LABEN 

{CASSETTE LESEH? 
)CASSETTEMFLA6 SETZEH 
jIEICKH LABEN 
,'IEIN 



21 A9 CD 93 02 
21 AC £5 
21AD 06 FA 



CASSETTEN INPUT 
CALL 0293 
PUSH HL 
LD B,FA 



;CASSEnENRECOitDER AH UNO HEADER LESEH 
I POINTER RETTEH 
|HAX. 2»D lEICHEN 
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21AF m A7 10 
21 B2 CD 35 02 
21B5 77 
21B6 23 
2187 FE OD 
21F9 28 02 
2IBB 10 FS 
21BD 2fi 
21BE U 00 
21C0 CD F8 01 
21C3 2fl fl7 40 
21 Ci 21 
21C7 le 22 



21C9 01 M 21 
21CC C3 
21 CD FE 22 
21CF CO 
21D0 CD a 2B 
21D3 CF 
21M 3B 
21D5 E5 
21D6 CD AA 28 
21D9 El 
21DA CI 
21D6 E5 
211)C C5 63 IB 
21DF CI 
21E0 DA BE ID 
21E3 23 
21E4 7£ 
21E5 B7 
21Et 2B 
21E7 C5 
2IE8 CA 04 IF 
21EB 36 2t 
21ED IS 05 



21 EF £5 
21 FO 2A FF 40 
21F3 F6 AF 
121F4 AF 
ZIF5 32 DE 40 
21F8 E3 
21F9 16 02 



21FB CF 
21FC 2C 
21FD CD OD 26 

2200 E3 

2201 D5 

2202 7E 

2203 FE 2C 
2205 28 26 



2207 3A D£ 40 
22DA B7 
220B C2 96 22 
220E 3fl A9 40 

2211 B7 

2212 IE 06 
2214 CA A2 19 
2217 3E 3F 

2219 CD 2A 03 
221 C CD &3 IB 
22iF Dl 

2220 CI 

2221 DA BE ID 

2224 23 

2225 7£ 

2226 B7 

2227 71 

2228 C5 

2229 CA 04 IF 



LD M.,(40A7) ;I/E)-BUFFERANFAW NACH HL 

CALL 023S ;1 ZEICHEH USEN 

LD (HL),A ;A8^ICH«)H 

IK m [BUFFERZ. IMC. 

Cf OD ;REC0RKI1DE? 

JD Z,21BD jJA 

DJNZ 21B2 ;IIEITER, BIS HAI. 290D ZEICHEM 

SEC HL iRECDKIEHDE niT NARKIEREH 

LD (HL},00 

CALL OlFB )CASSEnEHRECORDE(t AUS 

LD 1C,(40A7) [I/D-BUFFERAHFAXe HACH HL 

DEC HL ;BUFFEfiZ. 1 BYTE VOR ANFANG 

JR 21EB ;IIE1TER 



TASTATUfillffUT 

LD BC,21DB 

PUSH BC 

CP 22 

RET NZ 

CALL 2866 

RSI 08 



CALL 

POP 

RET 

PUSH 

CM.I 

POP 

JP 

IMC 

LD 

W 

DEC 

PUSH 

JP 

LD 

JR 



HL 

2BAA 

HL 

HL 

1BB3 

BC 

C.IDBE 

HL 

A,(HL} 

A 

HL 

BC 

Z,1F04 

(HL},2C 

21F4 



iRUECKSPRUNSADRES^ SETZEM 

;ABFRAeETEXT? 

'PiEIN HACH 21DB 

;TEXT^TRINe IN 2HISCHEHSPEICHER m I UEBERKMCH 

jSYNTAHCttCKi POIMTER Alff ';'? 

;P1]IHTER RETTEh' 

jTEITSTRINe HHJCEEN 

(PDIKTER ZUftUECK 

;KITER lEI 21DI 

[POINTER RETTEN 

;'? > HtUCKEM WD EIWAK EIHER ZEILE IM I/D-BtlFFER 

I POIMTER HACH BC 

iBKAK? -> SPRUM& IN UKTEf)BR£CHUM8SRDUTINE 

;B1IFFERZ. AUF ERSTES ZEICHEK 

J ZEICHEH LADEH 

;>ZEILEMERD£? 

iWFFEDl. HEDER VW 1. ZEID^H 

i POIMTER RETTEN 

;JA. IMPUT-ANHEISUHE UEBERKHEH, ALTE KRTE BElBEHALTEN 

;'/ VOR 1. ZEICHEM EIHFUE6EH 

IKITER 



tt R£AD 



DATEN AUS PROHIAMHTEIT LESEK 

PUSH HL {POINTER RETTEN 

LD HL, (40FFI ;MTA2EI6ER MACH HL 

OR AF iDATtfLAG SETZEM 

m A jDAT«aA6 LOESCHEH (BEI TASTATtlfilNniT ODER CASSETTED 

LD (40DEI,A ;UTAFIK USPEIOSftK 

EX (SP),HL iBUfFER-lDATA-) Z. NIT POINTER VERTAUSCHEN 

JR 21FD ;MEITER 



HAECttSTE VARIABLE 



RST 

CALL 

EI 

PIBH 

LD 

CP 

JR 



08 

260D 

(SP},HL 

DE 

A,(HL) 

2t 

2,222D 



;S™tAXCHECK: POINTER AUF ','? 

{VARIABLE IN VA^TAB SUCHEH: VARTABADRESSE MACH DE 
;POIMTER RETTEN, BUFFERZ. MACH HL 
jVARTABADRESSE RETTEN 
;ZEICHEM AUS BUFFER LABEM 
I' '/? 
;JA, HEITER 



BUFFER LEER (KEIH ',') 



LD 

OR 

JP 

LD 

OR 

LD 

JP 

LD 

CALL 

CALL 

POP 

POP 

JP 

IKC 

LD 

OR 

DEC 

PUSH 

JP 



A, (40DE} 

NZ,2Z96 

A, (40A9) 

A 

E,D6 

Z,19A2 

A,3F 

032A 

1BB3 

DE 

BC 

C,1DB£ 

HL 

A,(HL) 

A 

W. 

DC 

Z,1F04 



iDATAFLAG 6ESETZT? 

;JA, NAECHSTE DATA-ARMEISIMG SUCHEN 
;EASSETT£M1HPUT? 

;DD-ERRDR-COD£ HACH E 
;JA, OD-EffliOR 
;TASTATURIIH)UT: '7' AUS6EBEH 

jERWUTE EIH6ABE BIT '?? ' 

(VARTABAWESSE ZWUECK 

; POIMTER ZURUECK 

{BREAK? -> 5PRUN8 IH UMTERBRECHUNGSROUTIW 

IBUFFERZ. AUF 1. ZEICFKN 

j ZEICHEH LADEH 

jZEILEMENDE? 

}BUFFERZ. VEH) ERSTES ZEICHEH 

IPOIMTER RETTEN 

;JA, RESTLIDCH INPUT UEBERKHEH OKIE VUIABLEMKRTE ZU AENDERM 
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222C B5 PUSH BE j VMTABflDRESSE HlESEfi HETTEM 

EIKAK KCtlDIEREH 

2211 CC DC 41 CALL 41K 

2230 E7 RST 20 ;TrP KR VARIAK.EH TESTEK 

2231 F3 PUSH Af jTYP-FLAfi RETTEN 

2232 20 19 JR NZ,224D jMUHERISCMER TYP? --> SPRUNG 

STRIN8 IH X 1S8ERHEHNEH 

2234 D7 RST 10 ;BUFFERZ. AUF HAECHSTES ZEICHEN 

2233 57 LD D,A ;ALS TREHNZEICHEH MACH D UHD I 

2236 47 LD B> 

2237 FE 22 CP 22 j= "■? 

2239 28 03 JR Z,2240 ;JA, '" ALS TRENNZEICHEM BEMUTZEH 

22M li 3A LD D,3A )NElH, 't' UW ',' ALS TREWIZEICHEK MtWTIEl 

2231 06 2C LD B,2C 

223F 21 DEC HL ;UW ZE16ER 1 BYTE VOR STRIH6 ZURUECX 

2240 CI 69 2B CALL 28(9 ; STRINBKWSTAHTE IH ZVISCHENSPEIDHER UNB X UEBERHEHNEN 

HEUEN VARIABLEHHERT ABSPEICHERH 

2243 Fl POP AF jTYP-FLfffi ZURUECK 

2244 EB El DE.HL ;BUFFERZ. NACH BE 

2245 21 3A 22 LB HL,22» {RtECKSPMNfiADRESSE HACH HL 

2248 E3 EI (SW,HL [HIT VARTAMBttSSE VERTAU5CHEH 

2249 B5 PUSH K iWFFERZ. RETTEH 

224A C3 33 IF JP_ IF33 _ ;SPRWiG IH LET-ROUTIHE UND BAHH MACH 225fl 

ZAHL IN X UEBERNEHHEX 

224B B7 RST 10 ;HAECHSTES ZEICHEH 

224E Fl POP AF jTYP-FLAfi ZWUEO: 

224F F5 PUSH AF ;UNB HIEDER RETTEN 

2250 01 43 22 LB BC,2243 ;RUECKSPRUNSAS«£SSE SETZEN 
2253 CS PUSH BC 

?^t it^ ^ 511 ^,t h'^''^ iS'"^^ """ INTEGER? --> STRIHS IN ZAHL PASSEHBEM TYPS UHNANDELN UHD NACH 2243 

22S7 B2 65 OE JP_ Nt,0E65 ;DOUBLE? --> STRING IN DOIAU UtWANDELN UM HACH 2243 

EHMGFRAS 

225A 2B DEC HL ;BUFFERZ. DEC 

225B D7 RST 10 ;NAECHSTES ZEICHEH, OKR 'i'? 

223C 28 OS JR 2.2263 -JA ' 

225E FE 2C CP 2C U ',' 

2260 C2 7F 21 JP NZ,217F jHEIll, FEHLER 

2263 E3 El (SP),HL ;PaiHTER HIT BUFFERI. VERTAUSCHEN 

2264 2B BEC HL {POINTER DEC. 

2265 D7 RST 10 jNAECHSTES ZEICHEH. ANWISUNGSEHDE? 

2266 C2 FB 21 JP •'^21FB__ ;HEIN, HEITER HIT DER NAECHSTEN VAftlASLEH 

KEIHE NEITEREN VARIULEH NEHR 

2269 Dl POP DE jKJFFERZ. HACH DE 

226A 00 HOP iA8FRA6E, NELCHE READ-FEHLER HEfiVORRlEF HURDE DlffiCH HOPS ERSETZT 

226B 00 HOP |(SIEHE AHDERE VERSIONEN] 

226C00 HOP 

226B 00 mw 

226E 00 NOP 

226F3AK40 LD A,(40BE> ;DATA-RA6 6ESETIT? 

2272 B7 OR A 

2273 EB EI BE.HL {BUFFERZ. NACH HL, POINTER HACH BE 

H74 C2 96 ID JP NZ,1D96 jBUFFERZ. ALS DATAZ. ABSPEICHERN, POINTER NACH HL ZURUECK UND FERTI6 

2277 D5 HBH BE ;POIHTER RETTEH 

2278 CB DF 41 CALL 41BF 

227B B6 OR (M.) ;ZEILENEHDE IN BUFFER ERREICHT? 

227C 21 86 22 LD HL,2286 {ZEIfiER AUF TEIT '?E1(TRA IGNORED' 

227F C4 fl7 28 CALL NZ,28A7 ;HEIN, 'TEITRA IGNORED' AUSGEBEH 

2282 El POP HL {PQIHtER ZURtJECK 

22B3 C3 69 21 JP _ 2169 _ lAUSGABE-FLAG Atff DISPLAY, FERTI8 

TEXT 

2286 3F 45 78 74 72 61 20 69 67 tE 6F 72 65 64 00 00 7EITRA IGNORED,. 

NAECHSTE DATA-ANHEISUHG SUCHEN 

2296 CB 05 IF CALL 1F05 ;£WE DER ANHEISUNG SUCHEN 

H« B7 OR A i= ZEILENEKBE? 

229A 20 12 JR HZ,22AE ;NEIH 

22W 23 INC a iJA, PROGRWIENBE? 

229fl 7E LD A.tHLJ jlZEILENZEIGER = 0000) 

229E 23 INC ti 

229F B6 OR (HLl 

22M IE 06 LD E,06 fOD-ERROR-CODE NACH E 

22fl2 CA A2 19 JP Z,19A2 jJA, OD-ERRflR 

5EITE BO 



22A3 23 
22U 5E 

22A7 23 
22AB Si 
22A9 EB 
22AA 22 DA 40 
22UEI 
22AE D7 
22AF FE BB 
22B1 20 E3 
2213 C3 20 22 



22M II 00 00 
2219 C4 OB 2i 
22BC 22 W 40 
22IF CB 36 19 
22C2 C2 9D 19 
22C3F9 
22Ci 22 E8 40 
22C9 OS 
22CA 7E 
72a 23 
22CC F5 
22C6 03 
22CE 7E 
22CF 23 
2200 B7 
2281 Ffl EA 22 



22B4 CB SI 09 
22S7 E3 
22DB E3 
22B9 CB OB 07 
22BC El 
22DD CB CB 09 
22E0 El 
22E1 CB C2 09 
22E4ES 
22E9 CB OC OA 
22Ea IB 29 



22EA 23 
22EB 23 
2SC23 
2:^0 23 
22EE 4E 
22EF 23 
22F0 46 
22F1 23 
22F2 E3 
22F3 5E 
22F4 23 
22FS 56 
22F& ES 
22F7 69 
22F8 60 
22F9 CD B2 OB 
22FC 3A AF 40 
22FF FE 04 
2301 CA 82 07 

2304 EB 

2305 El 

2306 72 

2307 2B 

2308 73 

2309 El 
230AB3 
230B 5E 
230C23 
230B 56 
230E 23 
230F E3 

2310 CB 39 OA 

2313 El 

2314 CI 



IHC 

LB 

IMC 

LB 

EI 

LB 

El 

RST 

CP 

JR 

JP 



HL 

E.IHL) 

HL 

D,(HL) 

BE.HL 

(40M),HL 

BE,HL 

10 

88 

NZ,2296 

222D 



;BATA-Zffi LADEK 



tINSB) 

;UNB ABSPEICHEM 



jHAECHSTES ZEICHEH 
;= BATA-TOKEJl? 
;HEIN, HEITER SUCHEN 
;DATEIi KITER LESED 



1 1 HEI T- ANME t SUNG 

HIEBEf)H0LW8SAMEISUHS BEI FQR-MEIT-SCHLEIFE 



LD DE,0000 jVARTABAWESSE ' (FUER NEXT QHNE VHHAHE) 

CALL HZ,260B ;HElTEitE ZEIQCR? -> VARIABLE SUCHEN, VARTABADRESSE NACH DE 

LB UOSFJ.Ifl. {POINTER ABSPEICHERN 

CM.L 1936 ;IM STACK HAECHSTE GBER SCHLEIFE HIT RICHT16ER LAUFUARIABLEN SUCtCH 

JP HZ, 1990 iHICHT SEFUH0EH7 -> NF-ERRDR 

LO SP.HL ;DURCH STACKKDRREKTUR ALLE DA2HISCHEN VERSCHACHTELTEH 

LB l4bE8l,a iSCHLEIFEH EHTFERNEH 

PUSH BE ;LA11FVARTA6ABRE5SE RETTEN 

LD A,(HLI ;INC-FLA6 LADEH 

IHC HL iSTACKZEI&ER IHC. 

PUSH AF ;IHC-FLAG RETTEN 

PUSH DE ;VAf)TABA9R£SSE RETTEN 

LO A,(HL) ;TYP-FLAG LADEH 

IHC tl ;STACKZEIKR INC. 

QR A )= S1H6LE? 

JP N,22EA jHEIN 



SIH^E 

CALL 09B1 jIHCREHEHT HACK I 

EI ISP),HL iVARTAUBRESSE MGH HL, STACKZEI8ER RETTEN 

PUSH HL iVARTABABRESSE RETTEH 

CALL 070B ;HERT DER LAUFVARIABLEH UHL)..) * INCREHENT (1) HACH I 

POP HL ;VARTABABRESSE ZURUEK 

CALL 09CB ;HE1£H HERT DER LAOFVARIABLE ABPSPEICHERH 

POP HL ;STACKZE]6ER ZURUECK 

CALL 09C2 ;EK0«RT HA£H ¥ LABEH 

PUSH HL iSTAKZEISER RETTEH 

CALL OAOC jHEUEH HERT DER LAtlFVARIABLE HIT ENDHERT VERGLEICHEN 

JR 2313 ;UHD NEITER 



INTEBER 

INC 

IHC 

IHC 

IHC 

LD 

IHC 

LD 

INC 

EI 

LD 

INC 

LD 

PUSH 

LD 

LD 

CALL 

LD 

CP 

JP 

EI 

POP 

LD 

DEC 

LD 

POP 

PUSH 

LD 

IMC 

LD 

IK 

EI 

CALL 

POP 

POP 



HL 

VL 

HL 

HL 

C.IHL) 

HL 

B.IHL) 

HL 

ISPl.HL 

E,(HL) 

HL 

D.ltft.) 

HL 

L,C 

ok2 

fl,(40«fl 

04 

Z,07B2 

B^.HL 

HL 

(HL},D 

HL 

(HU,E 

HL 

DE 

E,(HL) 

HL 

D.IHLl 

HL 

(SPl.HL 

0A39 

HL 

BC 



1 2 UHHNirrZTE STACKEBEHEN UEBERBEHEH 

; INCREMENT HACH BC 

jIHSB) 

;STACKZE!GER RETTEN, VARTABADRE5SE DER LAUFVARIAKEN NACH HI 
jALTEN KRT DER LAUFVARIAH.EN LADEN 

; IH5B) 

iVARTMADRESSE * 1 DER LAUFVARIABLEH RETTEH 

ilHCREHEHT NACH HL 

;LAUFVAfiIABLENHERT * INCRENEHT NACH HL UNB I 

fTYPX = SIHSLE? 

; (lEBERLAUF) 

:JA, DV-ERRDR 

;NEUEH HERT DER LAIFVARIABLEN HACH DE 

iVARTABADRESSE *l DER LAUFVARIABLEH HACH HL ZURUECK 

)UW ICUEN HERT ABSPEICHERN 

i (LSBl 

;STACKZEI6ER ZWUECK 
iHEUEN HERT RETTEH 
; ENDHERT LADEN 

{(NSBI 

iHEUEN LAUFVARIABLDMERT lUltUECK, STACKZEIBER RETTEN 
iNEUEH HERT DER LAUFVARIABLEN HIT ENHERT VERBLEICHEH 
iSTACKZEI&Efi ZURUECK 
)IMC-FLA6 ZURUECK 

SEITE Bl 



2313 « 
2316 CO C2 09 

2319 2S 09 
231 B EB 

231C 23 h2 40 
231F i9 

2320 60 

2321 C3 lA ID 



2324 F9 

2325 22 ES 40 
2328 2fl DF 40 
2328 7E 

132C FE 2C 
232£ C2 IE ID 

2331 D7 

2332 CD m 22 



SUB t ;VERKEICHSERS. HIT IK-fLM VEHMlEPFEIt, SQIEIFE KEKDET? 

CALL 09C2 iZNR (DE) UHS ANFANeSFOINTEfi (BCI LADEM 

JR 1,2324 NA 

EX K.HL ;ZMt HACH HL 

LD ubA2),HL jAlS AK1IKLLE IM) ABSPElCKmi 

LD L,C ;AIFAN8SP0INTER HCH HL 

LD H.I 

JP iDlA iSCHlEIFEHAHKlSUHe AUSFUEHREK 



SCHLEIFE BEEHHT 



LD 
LD 

LD 

LD 

CP 

JP 

fiST 

CALL 



2335 CF 

2336 2« 



2337 2B 

233S lb 00 
233AD5 
233B OE 01 
233D CD 63 19 
2340 CD ff 24 
2343 22 F3 40 
2346 2fl F3 40 
2349 CI 
234A 7E 
234B 16 00 
234D D6 D4 
Z34F 38 13 
2351 FE 03 
2353 30 OF 
2355 FE 01 

2357 17 

2358 AA 

2359 8A 
235A 57 

235B DA 97 19 
235E 22 08 40 

2361 D7 

2362 IB E9 
2364 7A 
2565 B7 

2366 C2 EC 23 

2369 7E 

236A 22 08 40 
236D D6 CD 
236F D8 

2370 FE 07 

2372 DO 

2373 5f 

2374 3A AF 40 
2377 D6 05 

2379 B3 
237A CA 8F 29 
237D 21 9A 18 

2380 19 

2381 78 

2382 56 
23ft3BA 
2384 DO 

2383 C5 
2386 01 46 23 
2389 C5 
238A 7A 

238B FE 7F 



SP.HL {DURCH STAUKORREKTUR SCHLEIFE ENTFERHEN 

I40EB),HL 

HL, I40DF) iPOIKTER LADEH 

A,(HLI iZEICHEN LAOEI 

2C >x * ") 

NZ.IDIE |HEllt,'MECHSTEH aEFEM. 

10 IMAECHSTES ZEICHEN 

2289 tWECHST AEUSKK SCHLEIFE KARBEITEK 



UP EIPB (flF,BC,OE,KL«P) 

AU5MUCK AUS8ERTEH DER NIT KLAWER BE61HNT 



1:S1EHE EJP 
QiSlEHE EXP 

RST oe 



;SYHTAX-CHECKt POIHTER MJF '('7 



OP 



EXP (AF,BC,DE.HL«PI 
AUSDRUCK AUSKRTEH 

l!(KL),.'AUSDRUCK 
0:X«EREENIS 



DEC 

LD 

PUSH 

LD 

CALL 

CALL 

LD 

LD 

POP 

LD 

LD 

SUB 

JR 

CP 

JR 

CP 

RLA 

XDR 

CP 

LD 

JP 

LD 

RST 

JR 

LD 

OR 

JP 

LD 

LD 

SUB 

RET 

CP 

RET 

LD 

LD 

SUB 

OR 

JP 

LD 

ADD 

LD 

LD 

CP 

RET 

PUSH 

LD 

PUSH 

LD 

CP 



HL 

B.M 

& 

C.Ot 

1963 

249F 

(40F3),H 

HL, 140f3) 

BC 

A,(HL) 

D.OO 

D4 

C,2364 

Oj 

ltC,2364 

01 

D 

S 

D,A 

C,1997 

(40D8),HL 

10 

234D 

NZ,23EC 

A,(HL) 

(40081, HL 

CD 

C 

07 

HC 

E.A 

A,(40AF) 

OS 

E 

Z,298F 

HL,189A 

HL.DE 

A,fe 

D,(HL) 

D 

K 

BC 

K,234i 

BC 

5^' 



{POIKTER DEC. 

;LASTLEV£L = tPRlORlTAETSCOH KS LEllTEN OPERAHDEN) 

jRETTEM 

;6EHUE8£IID SPEICHER FREI? 

;NEIH, EM-ERROft 

jOPERANDEN ANALYSIEREN UM NACH X 

IPDIKTER ABSPEICHERH 

; POINTER LADEN 

;LASTLEVEL UCH S ZURUECK 

;)tAECHSTES ZEICHEN LADEN 

lOPERATORCQfiE ' 

;VER6LEICH5QPERAT0R? 

;H£IN 

'NEIN 

JBIT Fl£R >, 1 FUER = UHD 2 FUER < SETZEN 

;ENTSPRECHENDES BIT IN OPERATDRCUBE SETZEN 

;HAR Wftl£R SCHON 6ESTIT? 

;(D.H, DER 6LEICHE OPERATOR ZUN ZKEITEH HALE) 

;JA, SN-ERRDR 

I POINTER ABSPEICWRH 

;NA£CHSTES ZEICHEN 

IKITER 

iOPERATORCODE > 0? 

I (VER6LE1CHS0PERA1DR BEFUNKN) 

)JA 

; ZEICHEN LADEH 

iPaiHTER ABSPEICHEKH 

{FINER DER RESTLICHEN OPERATOREN 

;NEIN, LETZTE OPERATION BERECHKN, FERTIG 

iNEIH, S.D. 
iOreRATORCOSE NACH E 
;STRINB IN I 

;UNO 't'-DPERATDR? 

jJA, STitIH6VERKNUEPFUH8 

(LEVEL DES Of^MTMS AUS TABELLE EHTNEHHENi TABANFAIffi HACH HL 

jCHRATtHtCODE AIBIEREN 

)LASTLEVEL NACH A 

;NEM.EVa AUS TABELLE LADEH 

jLMTUVEL >= WHLEVEL? 

jJA, LEtZTE OPERATION BERECHNEH 

;LASTLEVEL RETTEN 

{ADRESSE FUER NAECH3TEK QPERAHDEN WF STACK 

(HEHLEVEL ' 7F? 
jtOPERATDR « 'It') 
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236!) CA D4 23 JP Z,23D4 [JA 

2S90 FE 51 CP 51 ;WD MtER OR? 

2392 DA El 23 i? C,23E1 jJA 

DFERMDEN AUF STACK 

23?S 21 21 41 LD lti.,4121 ilC-ADDESSE NACIt HL 

2398 B7 OR A jCY LDESCHEH 

2399 3A AF 40 LD A,(40AF) gTYPX LADEN 

259C 31 BEC A ;TYP]I - 3 tIACH A, STRING IN I? 

239D 3D DEC A 

239E 36 DEC A 

239F Cft Fi OA JP I.OAFt jJA, TH-EBROR 

23A2 4E LD C,(HLI ;DPERAW)EH LADEN 

23A3 23 INC HL 

23A4 ^i LD B.IHLI jlHSil 

23AS CS PUSH BC jUNI AUF STACK 

23A& FA CS 23 JP I1,23CS ;INTE6ER IN ll -> FERTIfl 

23A9 23 INC HL 

23AA 4E LD C,iHL) iOPERMOIEK LADEN 

23AB 23 INC HL 

23AC 4& LD B.tHL) |(NSB) 

23A0 C5 PUSH BC {UM AUF STACK 

23AE F5 PUSH AF jTYP-fLA6 RETTEN 

23AF B7 OR A jSlMlE? 

23B0 E2 C4 23 JP P0,23C4 jJA, FERTI6 

23B3 Fl POP AF ;TrPFLA6 ZURUECK 

23B4 23 INC HL 

23B5 3B 03 JR C,23IA jV AUF STACK? --> NEITER 

23B7 21 ID 41 LD hL411D ;LSB I ADRESSE HACH HL 

23BA 4E LD C.IHL) jOPERANDEN LADEN 

23DB 23 INC HL 

23fiC 4& LD B,(HL) ;(LSB) 

23BD 23 INC HL 

23BE CS PUSH BC ;UND AUF STACK 

23BF 4E LD C,(HL) jOPERANDEX LADEN 

23C0 23 INC HL 

23C1 4& LD B.IHL) ;(LS8) 

23C2 CS PUSH BC jlMI AUF STACK 

23C3 U Fl LD B.Fl 

I23C4 Fl POP AF iTYP-FLAB ZURUECK IBEI SIHEIEI) 

23CS C& 03 ADD 03 iTYPCDDE ERRECHHEN 

23C7 4B LD C.E ;OPERATDfrCniE HACH C 

23CS 47 LD B.A ;TYPCDDE NACH B 

23C9 CS PUSH BC ;AUF STACK 

23CA 01 0& 24 LD BC,240A lADRESSE Fie VERARKITUN6 DER OPERATIQNEN 

23CD C5 PUSH BC jAUF STACK 

2JCE 2A D8 40 LD HL,f40DBl jPOINTER ZURUECK 

23D1 C3 3A 23 JP 233A jNAECHSTER OPERAND 

OPERANDEN FUER PONER AUf STACK 

23D4 CD Bl OA CALL OABl jX IN SINGLf UMANDELN 

23D7 CD A4 09 CALL 09A4 ;I AUF STACK 

23DA 01 F2 1! LD BC,t3F2 ;AlffiESSE ZUR BERECHNUNG DER PQTENZ HKH K 

23DD li 7F LD D,)f jNEW-EVEL > 7F 

23DF IB EC JR 23(:D jKITER HIE DBEN 

QPERANDEN FUER AND, ») AUF STACK 

23E1 D5 PUSH DE : OPERATORCDDE RETTEN 

23E2 C6 7F M CALL 0A7F ;EH>ERAW) IN INTESR UNMNDELN 

23ES Dl POP DE )0PERATIKCOD€ ZURUECK 

23Ei> ES PUSH HL jQPERAND AUF STACK 

23E7 01 E9 2S LD BC,25E9 ;ADRESSE ZUR VERARBEITUN6 VON AND UND OR HACH BC 

23EA 18 El JR 23CD ;HEITER HIE DBEN 

VER6LEICKSDPERAT0REN BEARBEITEN 

23EC 78 LD A,B ;HATTE LETZTER OPERATOR HDEHEREN ODER SLEICHEH LEVEL? 

23ED FE 64 CP 64 
25EF DO 
23F0 CS 



RET HC ;JA, LETZTE OPERATIC BERECHHEN 
PUSH BC [LASTLEVEL RETTEN 
23F1 D5 PUSH DE {OPERATORCDDE RETTEN 

-- ■ ■ iLEVEL MCH D, Cfflffi FUER VERSLEICH HACH E 

iAMESSE ZUR AUFARBEITUH6 DES VER6LEICHSER6EBNISSES AUF STACK 



23F2 11 04 64 LD DE,6404 

23FS 21 B8 2S LD HL,25B8 

23FS E5 PUSH HL 

23F9 E7 RST 20 (TYP TESTEH 

23FA C2 n 23 JP NZ,2395 ;HUfERI3CICR TYP? -> OPERATDREN AUF STAU (S.D.) 

23FD 2A 21 41 LD KL,(4121) ;STR1HG: STRIWZEIKR AUF STACK 

Z400 E5 PUSH HL 

2401 01 8C 2S LD BC,2SBC {AIHtESSE FUER STRIHGVER8LEICH AUF STACK 

2404 18 C7 JR 23tD jHEITER HIE DiEH 
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2m ci 

2407 79 

2408 32 
2401 79 
24()C FE 
240E 28 
2410 U 
2413 FE 
241SCA 

2418 S7 

2419 78 
241 A FE 

24 ic a 

241f 7ft 

2420 FE 

2422 CA 

2423 02 



QPERATIONEN AU^UEHfKN 



BO 40 



28 

AF 40 
OB 
U 24 



04 
72 24 

03 
Fi OA 

7C 24 



242S 21 BF IB 
2421 Oi 00 
242B09 
242E09 
242F 4E 

2430 23 

2431 41. 

2432 01 

2433 2A 21 41 

2436 C5 

2437 E9 



DB OA 
FC09 



IF 41 
IS 41 



B4 09 
DB OA 
AB 18 
BO 40 



00 



2438 CD 
243B CD 
243E El 
243F 2! 
2442 El 

2445 22 

2446 CI 

2447 Dl 

2448 CD 
2441 CD 
244E 21 
2451 3A 
24H 07 
2433 C5 
24H 4F 
24S7 0& 

2439 09 
245AC1 
2431 7E 
245C23 
2431 U 
2451 tf 
243FE9 



Z4UC3 
2441 CI FC 09 

2464 Fl 

2465 32 AF 40 
2468 FE 04 
246A 28 DA 
246C El 

246D 22 21 41 
2470 18 D9 



2472 CD Bl OA 

2475 CI 

2476 Dl 

2477 21 6S IB 
247A 18 D5 



247C El 

247D CD A4 09 



POP 

LD 
LD 
LD 
CP 
JR 
LD 
CP 
JP 
LD 
LD 

JP 
LD 
CP 
JP 
JP 



BC 

A,C 

(40S0),A 

'a' 

Z,2438 

A,(40AF] 

06 

2,2460 

D.A 

,V 

Z,2472 

Si' 

Z,0AF6 
W,247C 



;OPERATt»tCCU)E UHQ TYP lW.mx. 
jEH>EltAT[IRCODE ABSPEICHEfiH 

(t. OPERAND DOUBLE? 

|JA 

{Z.OPBUHU) DOUBLE? 

,-JA 

;ryp DES 2.DPERANDEK HACK D 

;1. OPERAND SIWLE? 

;JA 

;NE]Hil. OPERAND INTE6ER1 2.0PERAHD STRIHB? 

[JA, TH-ERROR 

1 2. OPERAND SIH6LE7 -> SPRUH6 



IHUSERIR'ERATimEN AUSFUEWEN 



LD 

LD 

ADD 

ADD 

LD 

IK 

LD 

POP 

LD 

PUSH 

RET 



a.lSBF 
B,00 
HL,BC 
HL.BC 

c.k) 
rf. 

B.IHL) 
K 

HL, 141211 
BC 



l.DPEIIMD DOUBLE 
CALL OADB 

09FC 

HL 

(411F),HL 

111 ' 

UnD),HL 

BC 

DE 

09B4 

OADB 

HL,18AB 



CALL 

POP 

LD 

POP 

U> 

POP 

POP 

CALL 

CALL 

LD 

LD 

RLCA 

PUSH 

LD 

LS 

ADD 

POP 

LD 

INC 

LD 

LD 

JP 



BC 

C,A 

B,00 

HL.BC 

BC 

A.IHL) 

Hi 

H,(HL1 

in.] 



2.OPERAW DEHJRE 
PUSH BC 

09FC 

AF 



CALL 
POP 

LD 

CP 

JR 

POP 

LD 

JR 



(40AF1,A 

04 

Z,2446 

HL 

MI21),HL 

244B 



l.OF^RAHD SINGLE 
CALL OABl 

BC 

DE 

HL,1BB3 

2451 



POP 

POP 

LD 

Jfl 



S.DNRAND SIN6LE 
PW HL 
CALL 09A4 



;SPRUN6TABELLtNANFAH6 FUER INTE6ER LAHN 
jOreRATimcODE 2 HAL ADDIEREN 



JADRESSE LADEN 



;1. OPERAND ZURUECK 
;2.0PERAND NACH HL 
;NACK BC SPRIN6EN 



;2.(S>£RANKN IN DOUBLE UHFMKN 

;UM) NACN T 

)1. OPERAND UOH STACK HACH I 

;LS6 

*LSB 

;L5B, HSB UND EIP 

'NACH II 

;1. OPERAND IN DOUBLE UHFORHEN 

;AHFANG KR DDUBLE-DPERATIDNEN-SPRUH6TABELLE KACH HL 

iDPERATDRCDDE LADEN 

1*2 

{IC RETTEN 

;NAai BC 

;AUF Tf»AHFAN6 ADDIEREN 

•,K. wmx. 

jADRESSE NACH HL LAKN 

;(H3B1 
) (LSBI 
jlMD ANSPRINKN 



iOreRATORCDDE (C) UND TVP IB) RETTEN 

; 2. OPERAND HACH Y 

;TYP DES l.DPEUNDEN NACH A 

{HACH TYP X 

; SINGLE? 

;JA, VOft STACK HOLEN, IN DOUBLE UHNANDELN UU HEITER 

;NE!N, INTESER) I.OPIrAND NACH HL 

'NACH I 

}IN DOUBLE UHHMKLN UW UEITER 



I 2. OPERAND IN SINGLE UHHANDELN 
)1. OPERAND VON STACK NACH V 

jANFANB DER SIN6LE-0PERATI0NEH-5PR11N6TABELLE 
;OPERATIONEN AUSFUEHREH 



;1.0PERAHI (INTESER) HACH NL 
;2,DPERANDEN AUF STACK 

SEITE 84 



2W0 CO a Oft 


CALL 


24B3 CD IF 09 


CALL 


2484 El 


POP 


24B7 22 33 41 


LD 


24M El 


W 


2401 22 21 41 


LO 


24SE IB E7 


Jfi 



OM^ J IK SINGLE UHtMIKLN 

09IF |IM MCH y 

HL )2.I)PERMKH BUS STACK WCH t 

I4123),HI. iCEIP/HSI) 

HL 

(4i3i),Hi lasi) 

2477 )un mm 



UP IfilV (AF.K.K.HL) 

imiKRmmm 

liK'filVIDEW 

HL-DIVISOR 
OtmUOTIEHT (SIWIEI 

24^0 E5 PUSH HL jMVISOR KT1EH 

2491 £1 EI DE.HL jDIVIDEM NKH HL 

2492 a CF OA CALL OACF )Un ALS SINGLE HACH I 

2495 El POP HL jSIVIKHT ZUWECK 

2496 CD A4 09 CALL 09A4 ;MACK I ALS IHTE6ER 
2499 CD CF OA CALL OACF jIN S1I6LE UMMIDELH 

249C a AO 08 JP OBAO {SIN6LEDIVIS1NI: OUOTIENT NACH X 

UP OPERKD IAF,IC,DE,HL=P) 

QPERAHIIEtl ?m AUSMUCKSANALYSE AUSHERTEN 

I:(HLMI..=TE!(T 

Oil^ERBEBNIS 

249F D7 AST 10 ;HAECNSTES ZEICHEH, ANHE1SUM6SENDE7 

24M IE 28 LD E,28 -.HQ-ERRIHt-CODe HACh E 

24A2 CA A2 19 JP Z,19A2 jJA, W-ERf)DR 

24AS DA K OE JP C.OEU; }ZIFFEft? --> HERT DER ZAHL ERmTTELN, NACH I UND ZURIKCK 

24A8 CD 3D IE CALL 1E3D ;BUCHSTAI£? 

24AI D2 40 2S JP NC,2540 ]JA, VARIAILENKRT IN AtSMUCK EINBRINGEH 

24AE FE CD CP CD ;= '♦■-VORZEICWN-TKEN? 

2410 28 ED JR Z,249F jJA, IHeNORIEREN, KITER 

24B2 FE 2E CP 2E |ZE1C«EN > '.'? 

24B4 CA U OE JP Z.OEU; ;JA. ZAHL HACH X, FERTIB 

2487 fE CE CP Zt - ' -' -V0RIE1EH£«-TI1KEN? 

2419 CA 32 25 JP 1,2332 {JA, - TEILAUSDRUCK ERfllTTELN, FERTIB 

24DC FE 22 CP 22 i- '"? 

24l£ CA U 28 JP Z,2SU fJA, STRINEKONSTANTE NACH I, FERTIB 

24C1 FE CI CP CI (« lioT-TQKEN? 

24CI CA C4 » JP Z,25C4 ]JA, HOT TEILAUSDRUCK BESTinHEN, ZURUECK 

24Cfi FE 2i CP 2i [= h"? 

24CB CA 94 41 JP Z,4194 jJA, tKTALE ODER HEIADEZIHALE KQKSTANTE NACH I (HW IN DISK-BASIC) 

24CI FE C3 CP C3 ;= ERR-TOKEN? 

24CD 20 OA JR NZ,24D9 ;HEIN, HEITER 

It ERR-FUNKTION 

ERGIBT DEN LETZEN FEHLERCQDE 

24(7 DT RST 10 }HAECHSTE5 lEICHEH 

24D0 3A 9A 40 LD A,I409A) {LETZTEH FEHLERCODE LADEN 

2413 E5 PUSH HL ;POINT£A RETTEH 

24D4 CD FB 27 CALL 27FB ;FEHlERCOD£ ALS IHTE6EN NACH I 

24D7 El POP t^ {POINTER ZURUECK 

24M C9 RET ;FERTI6 

24D9 FE C2 CP C2 )= EftL-TOKEH? 

24DB 20 OA JR H;,24E7 ;)CIN 

n ERL-FUNKTim 

EMIBT LETZTE FEHLERZEILE 

24DD D7 RST 10 jIMECHSTES ZEICHEH 

24De E5 PUSH HL [POINTER RETTEH 

24DF 2A EA 40 LQ KL,(40EA) jllTITE FEHLER-ZHR LADEN 

24E2 CD bi OC CALL 0C6& jALS IHTE8ER OHME SIGH IN SINGLE UMAKDELN UND NACH J 

24E3 El POP HL [POINTER ZURUECK 
24E6 C9 fi£T fERTIS 

24£7 FE CO CP CO )= VARPTR-TOKEH? 

24E9 20 14 JR NZ,24FF ;HEIN 

It VARPTR-FUWTION 

ERGIBT VARIA&LENADRESSE IN VARTAI 

24ei 67 RST 10 ;1«CHSTES lElCHEN 

24EC ff RST 08 {SVNTAXCHEtt: POINTER AUF M'? 
24ED 28 ( 

24EE CI OD 26 CALL 260D ; VARTABADfiESSE NACH DE 

24F1 CF RST 08 iSYKTAXCHEO:! POINTER ftUF '1'? 
24F2 29 1 

24F3 E5 POSH W. (POINTER RETTEN 

24F4 El EX DE.HL ;VARTABADRESSE NACH HL 

24F5 7C LD A,R (« 0? 
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24Fi BS 
24F7 CMfi IE 
24FA CS % OA 
24F6 El 
24FE C9 
24FF FE CI 
2501 Cfl FE 27 
2504 FE C5 
2906 CA 9D 41 

2509 F£ Ca 
250B CA C9 27 
250E FE C7 

2510 CA 76 41 
2513 FE Ci 
251S CA 32 01 
2518 F£ Z1 
291A CA 9D 01 
25iD FE C4 
251 F CA 2F 26 
2522 FE BE 
2524 CA 55 41 
2527 06 07 

2529 B2 4E 25 
252C CP 35 23 
252F CF 

2530 29 

2531 C9 



25 J2 16 7B 
2534 CD 3A 23 
2537 2A F3 40 
253A E5 
253B CP 7B 00 
253E El 
253F C9 



2540 CD OD 26 
2543 E5 
»44 EB 
2545 22 21 4! 
2548 E7 
254'J C4 F7 M 
254CE1 
254!) C9 



254E 06 00 

2550 07 

2551 4F 

2552 C5 

2553 117 

2554 79 

2555 FE 41 
2557 38 li 
2559 CD 35 23 
255C CF 

255B 2C 
255E CD F4 Ut 

2561 EB 

2562 2A 21 41 

2565 E3 

2566 E5 

2567 EB 

256S CD IC 2B 
256E EB 
256C E3 
256D IS 14 
256F CD 2C 25 

2572 E3 

2573 7D 

2574 FE OC 
257t 38 07 
257B FE IB 
257A E5 

257B DC Bl OA 

257E EI 

257F 11 3E 25 



OR 

3f 

CALL 

POP 

RET 

CP 

JP 

CP 

JP 

CP 

JP 

CP 

JP 

CP 

JP 

CP 

JP 

CP 

JP 

CP 

JP 

SUB 

JP 

CfiLL 

RST 

RET 



L 

Z,lE4ft 
0A9A 
HL 

CI 

I,27FE 

C5 

cV" 

I,27C9 

C7 

2,4176 

t6 

Z,0132 

C9 

Z,019D 

C4 

Z.2A2F 

BE 

Zj41K 

hi 

HC,254E 

2335 



; (VARIABLE NICHT IK VftRTAB) 

iJA, FC-ERfa» 

iVAKTABADRESSE ALS IHTESER NACH I 

(POINTER ZUftUECK 

i PERT I 6 

■,' USR-mEH'! 

iJA 

J' IMSTRI-TDKEH? 

;JA INUR IN DISK-BASICI 

)= MEH-TKEN? 

;JA 

i= TIHEI-TWEH 

;JA (NUR IN DISK-BASIC) 

i» POINT-TOKEN? 

;« 

;= IWCEYI-TOKEN? 

;JA 

i" STRIMB$-TOKEN? 

;JA 

;= FN-TOKEM? 

;JA (NUR IH OlSK-miCl 

;FUNKTII]NST»EN? 

;I£IN, IN tlAWERH EIHEESCHLOSSENEN AUSDRUCK AU5HERTEH 
jSrHTAKCHECKt POINTER AUF '!'? 

1 
jFERTIS 



■-'-VORIEICHEH fiUSffiRTEN 



LD 

CALL 

LD 

PUSH 

CALL 

POP 

RET 



D,7Il jLEVEL FIER '-'-VORZEICHEN 

233A (AUSDRUCK HIT PRIDRITAET AUBKERTEN 

HL,(40F3) iPOINTER LADEN 

HL ;UND RETTEN 

097B ;ERSEBNIS HAL i-l) 

HL (POINTER ZWUECK 



VARIABLEtNERT l)i AUSDftUCK EIHBRIK6EN 

CALL 260D ; VARTAiflMESSE HACK K, «HN VARIABLE WCHT VORHANDEN, 1=0, SOFORT ZUftUECK 

PUSH HL (POIHTER RETTEK 

EK DE.HL (VARTABAfiRESSE NACH HL 

LD (4121), HL ;UKD IK I ALS STRIKGZEIBER ftfiSPEICHERN 

RST 20 ;STR]N6VARIABLE? 

CALL ltI,09F7 iffilK, VARlABLEWtERT WO It UEBERlRllBEll 

POP HL {POirER 2WUECK 

RET 



FUHKTIONSARBUHENTE AUSHERTEN Uffil FIMTIONEN ANSPR1N6EN 



LD B,00 ilFUKKTIWISTOKEN - D7} t 2 ERBIBT TAKLLEHOFFSEI 

RLCA 

LD C.A ;NACH BC 

PUSH fiC (TABOFFSET RETTEN 

RST 10 iNAECKSTES ZEIOfli 

m A,C (LSB TABDFFSET > 41? 

CP 41 ;(NIDt, RISHT*, LEFT*-TDKEJIS) 

JR C.256F iNEIH 

CALL 2335 ;l.AR6UflEHT AUSHERTEN 

RST 08 ;SYNTAXCHECK! POINTER AUF ','? 

CALL 0AF4 ;l.AftSUHEHT KElli STRIN6? ~> Ttt-ERftOR 

EI DE.HL (POINTER NACH DE 

LD HL.'4]2]) (STRINSZEIGER LADEN 

EK (SP),HL (TABOFFSET ZURUECK, STRINSZEIBER REHEN 

PUSH HL (TABDFFSET RETTEN 

EX DE.HL jPDIVTER HIEDER NACH HI 

CALL 2BIc (2.AR6UNENT ANALYSIEREN, BANZZAHLI&EK KRT « 2S6D) NACH DE 

EK DE.HL j2.«tBURENT NACH H., POINTER KACH DE 

EI ISP), a (2.AR8UHENT RETTEN, TABOFFSET ZURUECt 

Jft 258! (NEITER 

CALL 2S2C (ARGUnEHT AUSKRTEN 

EK (SP),KL (POINTER RETTEN, TABOFFSET WCH HL 

LD A,L [LSB-TABOFFSET i. OC? 

CP OC j ISSN, INT, ABS, FRE, INP, POS) 

JR C,257F }3A 

CP IB (LSB-TAMFFSET < IB? 

PUSH HL ((SIN6LEFUNKTI0NEN: SSR, BND, L06, EKP, COS, SIN, TAN, ATNl: TABOFFSET RETTEN 

CALL C.OABl JJA. AR6UHENT IN SINGLE UwMln ' 

POP HL (TAiOFFSET ZURIECK 

LD DE,253E (RUECKSPRUN6ADRESSE SETZEN 
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23S2 K 
25B3 01 OB U 
2S8& 09 
2SS7 4E 
2Sa8 23 
2S89 U 
2SeAi9 
23aS E9 



Z5BC CB D7 29 
25ff 7E 

2590 23 

2591 4E 

2592 23 

2593 4i 

2394 Dl 

2395 C5 

2596 F5 

2597 CD D£ 29 
259A Dl 

259B 5E 
259C 23 
259D 4E 
259E 23 
239F 4i 
25A0 El 
25fll 7B 
25A2B2 
25A3 C8 
2SA4 7A 
2SA5 D& 01 
25A7 DB 
25A8 AF 
25A9BB 
25AA 3C 
2SAfi W) 
25AC IS 
2SAD ID 
2ME DA 
25flF BE 
25flO 23 
2581 03 
?SB2 2B ED 
25B4 3F 
25M C! iO 09 



25BB 3C 

2589 8F 
25BA CI 
2SBB AO 
25flC C4 FF 
25BE 9F 
25BF CD BD 09 
25C2 IB 32 



25C4 \i 5A 
25C4 CD 3A 23 
25C9 CD 7F OA 
25CC 7D 
25CD 2F 
23CE if 
25CF 7C 
25D0 2F 
2SD1 61 
25D2 22 21 41 
2SD5 CI 
mb C3 46 23 



PUSH 

LD 

ADD 

LO 

IKC 

LS 

LD 

if 



DE 
BC,U08 

HL.SC 

c.Ihl) 

HL 

\\,iVL) 

L,C 

IBLl 



itPOP HLi WHITER lURUECK, FEftTIfil 
;TAUHFAW HACH K 
jTABOFFSET ANIEREH 
fSPRUNGADRESSE LADEN 

i (LSfi) 

)UNS FUHKTIOH ANSPRIN6EH 



STRIMSVERSLEICH 



CALL 

LD 

IK 

LD 

INC 

LD 

POP 

PUSH 

PUSH 

CALL 

POP 

LD 

INC 

LD 

IK 

LD 

POP 

LD 

OR 

RET 

LD 

SUB 

RET 

lOR 

CP 

IK 

RET 

BEC 

KC 

LD 

CP 

INC 

IK 

JR 

CCF 

JP 



29D7 
A.(ll] 

HC 

C,(HL) 

HL 

B,(HL) 

DE 

6C 

AF 

29DE 

DE 

E,(HL) 

HL 

C,(M.I 

HL 

B.(HL) 

ic 

,v 

c 

A 
E 

A 

NC 

D 

E 

A, \B 

(HLI 
HL 
BC 
Z,23A1 

0940 



BC) 



;2.STRINGADRESSE HACH BC 

|(RSfi) 

il.STRIH6ZE16ER NACH DE 
;2.STRIHBAHESSE UNO 
|2.STfiIN6LtfllGE RETTEH 

;1.STRIH6LAEII6E NACH E 
(l.STRIKADRESSE HACH BC 

•,mi) 

J2.STRIN6ADIIESSE ZURUECK HACH HL 
)BEIDE STRINGS HULLSTRIWS? 

;JA, ZURUECK HIT fl=0 FUER BLEICHHEIT 
;2.STRIKLAEHeE = 0? 

iJA, lURUECK HIT A=FF, C«l, S=l FUER l.STfilHfi > 2.BTRIH8 

)A s 

;1. STRIHGLAEHK = 0? 

i5?bi1Sil,£l'^;!' " '^ '•'"'" < ""'" 

jZElCHEH AUS 1. STRING 

;niT ZEICHEH AUS 2.STRING VERGLEICHEN 

iZEIBER IHC. 

;6EIDE ZEIEHEN 6LEICH? --> NEIIER 
|CY KOHPLEKNTIEREN 
;FLA8 AUFBEREITEN, FERTI6 



ER6E6MIS &ES VERfiLEICHS HIT VERSLEICHSOPERATOR 2U BESANTERBEBHIS ZOSAHHEHFASSEH 



IK 

ADC 
POP 

m 

ADD 
SBC 
CALL 
JR 



A 

BC 

B 

FF 

A 

098D 

2504 



[VEWiEICHSEflfiEBHlS (l.OP > 2.0P, A=FF, CY=Ii l.OP = 2,0P, A=0 WD l.OP < 2.0P, 

I (l.OP > 2. OP, A=lj l.OP = 2.0P, A=2, l.OP < 2.W, A-4) 

jSt'eKh UEBEWIH?'*"^" '"^ " ^^^ ^' ' ^^^ '' "*" *" 2 FUER < BE 

iJft, cy=i 

;UHD FDLSLICH A=FF 
;A ALS INTEGER NACH I 
;H£ITER 



HOT AUSFUEHREN 
LD 



CALL 

CALL 

LD 

CPL 

LD 

LD 

CPL 

LD 

LD 

POP 

JP 



D,5A 
233A 
0A7F 
fl,L 

L,A 
A,H 

H,A 

(4121), HL 
BC 
2344 



; NOT -LEVEL HACH D 

jWSMUCK HIT PfilORITAET AUSWRTEH 
iERGEBHIS IH IHTEGER UNMRDELH 
{UHD BITNEISE KONPLEHEHTIEREH 
I (LSB) 



linSB) 

iUW KDHPLEKHT HACH I 
;LA3TLEV£L ZURUECK 
jKITER 



UP TYPCHK (AF) 

RST 20-UP: TESTET TYP DES I-MGISTElf INHALTS 

I:(40Afl=TYPK 

OiA«TYPI - 3 

INTEGER: S-1, P=l, C-l 

SIHBLEt C=l 

DOUBLE! P=l 
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2Sn U AF 40 
25KFE W 
2SDE 30 OS 
25E0 DA 03 
2SE2 B7 
2SE3 37 
25E4 C9 
2K5H 03 
23E7 87 
25E8C9 



:SE9C5 
2SEA CB 7F OA 
2XBF1 
2SEE II 
2SEF 01 FA 27 
25F2 CS 
23F3FE46 
25FS20 06 
25f7 7B 
2SFS IS 
23F9 6F 
ZSFA 7C 
2SFII2 
25FC C9 
2SFD7I 
2SFE AS 
25FF 4F 
2M0 7C 
2&01 A2 
2U2C9 



2603 21 

2604 D7 
2603 C8 

2606 CF 

2607 2C 



LB 

CP 

JR 

SttB 

QR 

SCF 

RET 

SUB 

OR 

RET 



STRING: I«l, C=l, P=I 



ft,{40tf) 
(k 

NC,23E5 

03 

A 



iTYPK LflKtt 

) DOUBLE? 

|JA 

ITYPI - 3 HACN A 

IFLAS SETIEH (S.D.) 

;EY SETZEB 

[TYPI - 3 MCH A 
;FLAGS STZEN (S.DJ 



AW/OR AUSFUEHREH 



PUSH 

CALL 

POP 

POP 

LB 

PUSH 

CP 

JR 

LB 

OR 

LB 

LD 

OR 

RET 

LB 

AND 

LB 

LB 

AW 

RET 



K 

0A7F 

AF 

BE 

BC,27Ffl 
BC 
46 
lfI,25FB 

f,^ 

L,A 
A,H 



A,E 

L 

L,A 

A,H 

B 



(LASTLEVEL RETTEH 

;2.DPEMHBEH IN INTEGER UHHAniELII 

)LEVEL HACH AF ZURUECX 

;l.{PERAn ZtHtUECX 

iRUEKSPRUNSABHSSE SETZEH 

;(AHACHH, HL HACH XI 

;AMD7 

}M 

liem OPERANBEH BKKISE ODER-VEMHUEPFEH 

llLSB) 



;[RSB) 

{KITER BEI 27FA 

jlEIDE OPERANDEN BITNEISE tJKD-VERKMiePFEN 

;(LSB) 



jINSB) 

;1IEITER BEI 27FA 



VERHALTUW BER UARIABLENTA6ELLE 

HEITERE AROUNENTE VDN DIfl 

BEC HL ;POINTER DEC. 

10 iMECHSTES ZEICHEH, ANHEISUKSSENBE? 

I {JA, FERTIS 

08 ;SYHTAXCHECKi POINTER AUF ','? 



RST 
RET 

RST 



tt BIH-AHHEISUNB 
FRBER EIHRICHTEN 
2608 01 03 26 LB BC,2603 
2601 CS PUSH BC 
260C F6 AF Oft AF 



;RUECKSP()UN66BRESSE FUER HAECHSTES ARSUHENT SETZEH 
jDIRFLAG SETZEH 



UP 



I260D AF 
260E 32 K 40 



2611 46 

2612 CD 3D IE 
2615 BA 97 19 

2618 AF 

2619 4F 
2&1A B7 
261B 38 OS 
261B CB 3D IE 

2620 38 09 

2622 4F 

2623 B7 

2624 3B FD 
2626 CI SI IE 
2629 30 FB 



262B 11 52 26 
262E DS 
262F 16 02 
2631 FE 25 

2633 C8 

2634 14 



SVAR IAF,BC,De,W.>P) 

VARIABLE IN TABELLE SUCHEH UHB EIHftlCHTEH, HEW HICHT VORHANBEH 

INEHH ANSPRUHG KICHT VOH AUSBRUCKSAHM.YSE (2439) OBER VARPTR (24F1)> 

I; (HL) > ■ 'VARIABLEHIWIE 

siK=VARTABA&fieSSE BER VARIAU.E (BE ZEIST AUF EflSTES BYTE BES KRTES) 

in A ;BIH-FLAG LDESCHEH 

LD J40AE),A iDIN-FLA6 ABSPEICHERN 

KAHEH EftHITTaH 

LB B.IHL) jt.ZEICHDI BES VARHANEH HACH B 

CALL 1E3B ;BUCHSTABE? 

JP C,t997 ;HEIIt, SH-ESROR 

lOR A ;2. ZEICHEH LOESCHEN 

LD C.A 

RST id ;MECHSTES ZEICHBI, ZIFFER? 

JR E,2622 ;JA 

CALL 1^3B ;BUCHSTABE? 

JR E:,262B ;HEIN, VARHAHE HUR EIN ZEICHEH LANG 

LB C.A ;2.ZEICHEN HACH C 

RST 10 iHAECHSTES ZEICHEH, ZIFFER? 

JR C,2623 {JA. HAECHSTES ZEICHEH 

CALL ihB ;BUCHSTAiE? 

JR NC,2623 }JA, HtfCHSTES ZEID£N 



TYP EMITTELH 
LB BE, 2652 



PUSH 

LD 

CP 

RET 

IHC 



DE 
D.02 
25 
Z 

D 



tRUECK9>RlMGADRESSE SETZEN 

jTYPCDBE (B> - IHTEBER 
;= 'I'? 
iJA. FERTIS 
iTYPCOOE = STR1H6 
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2635 n 24 CP 24 i* 'I'? 

2637 CB RET I pFERTIB 

?fS ir* „ If "*. "f^" ■ 8I«LE 

2639 FE 21 CP 21 |« "."! 
2631 a RET I FERTI6 

2b3t 16 W LB &.68 iTYPCOM = DDUILE 

2i3E FE 23 ff 23 j. 'I'? 

2640 CS RET^ I (fERTIB 

TYPCODE AUS TA6ELLE ENTWKfCH 

2642 D6 m V iSTELLUM DES l.fiUCHSTABEH IH ftLPHflBET ERHITTELN 

l*V, It ^ ^ '/ i^IT 7 (HARKIERUM VOK FURKIlQHSWlHEm ENTFERNEH 

2646 5F LD E,S {HACH DE 

2647 16 00 LD D.OO 

2649 E5 PUSH HL (PQINTER RETTEK 

264A 21 01 41 LD HL,4101 ;TyPMDETflfiAWAII6 LftDEH 

2640 19 ADS Hl.DE ;♦ OFFSET ER81IT lEISEft AUF filCHTIGES BYTE 

264E 56 LD D,(H) jTYPEOtt LMEB 

264F El POP HL (POINTER IlffiUEK 

2651 E9 RET jBEITER B^I 2652 

2652 7fl LB A,D [TYPCODE WKH TYPI 

2653 32 AF 40 LD (40AF),A 

2656 D7 RST 10 [NAECHSTES ZEICHEH 

2657 3A DC 40 LD A, {4060 WMYS 6ESPERRT? 
265A B7 OR A j (FUER LMIFVARIAIUII} 
265fl C2 64 26 JP W,2664 tJA 

26SF D6 28 SUB 29 >'('? 

2661 M E9 26 JP I,26E9 M, ARRAYWRIABLE 

^^i ^ .. '™ " jARRAYSPERRUW AUFHESEN 

2665 32 K40 LD (400C),A 

266B E5 POSH HL jPOlKTER RETTER 

2669 D5 PUSH DE j TYPCODE RETTEK 

??M It " *^ '■'' ***■' '"^" i'"'P'*"6 ^^ VflRIftBLEKTABELLE ItftCM BE 

266B EB EX DE,HL 

266E 25 FB 40 LD HL, (40FB) jANFANO DER ARRAYTABELLE HflCH HL 

liU ^ fSl 1^ i^^ KR VARTABELLE EftREICHT? 

W-,1 a . POP HL jTYP NACH H ZURUECK 

2673 2B 19 JR I,2ME jJA, KICHT SEFUNOEH 

2675 lA LD A,(DE) ;TYP AUS TABELLE LADEH 

M^ LD L,A RKHL 

Wl ^r ? 1 JSTIWT WT TYP SESUEHTEfi VfiRlABLER liEKRElH? 

2678 13 IRC DE (WAfiTABIEIOER IK. 

2679 20 OB JR NZ,2iB6 |HEIN. MECHSTES VARIABLE 
267B lA LD A, (DEI J2.ZE1CHEH AUS TABELLE 

W-,i !! . CP C )= 2,ZEICt€ll BESUCHTER VARIABLER7 

267D 20 07 JR ||Z,2686 jNEIN, MECHSTE VARIABLE 

267F 13 IK K ; VARTABZEI6ER AUF MEICHEI 

24B0 Ifl LD fl,(DE) ;1. ZEICHEH AUS TA8ELLE 

26|1 SB CP B ;= 1.2E1CHEN BEStlCHTER VARIABLER? 

2682 CA CC 26 JP Z,26CC 'jJA, VARIABLE SEFUNDEH 

2h3 3c 13 LD A|l3 

(2636 13 IHC OE iVARTABZElBER AUF l.ZEICHEMl 

2687 13 IK D£ jVAfiTABIEISER flUF KfiT 

26M E5 POSH HL [TYP BESUCHTER VARIABLER RETTEN (IN HI 

2M9 26 00 Li H,00 jVARTABZEIBER OB TYP ERHOEHEH 

268C IB DF JR 26iD j«ITER 

VARIABLE HICHT IN TABELLE 

268E 7E LD fl,H [TYP MCH A 

268F El POP HI [POINTER ZURUECK 

26W E3 EX {SP),HL [HIT RUECKSPRUttBAMESSE VERTAUSCHEN 

2691 F5 PUSH AF TYP RETTEM 

2692 Q5 PUSH DE [VWIMEffiE ffi7TE» 

2693 11 Fl 24 LD DE,24F1 j RUECKSPRUWADRESSE = 24F1? 

2696 DF RST IS [lAUFRUF VON VARPTRl 

2697 28 36 JR Z,26CF iJA 

2699 11 43 25 LD DE,2543 [RUECKSPRUttSABRESSE - 2543? 

269E DF AST 18 [(AUFRUF VOK AUSWftJCKSANALYSE) 

269D Bl POP DE [VARTABEHDE ZURUECK 

269e 28 35 JR Z,26DS (jA 

HEUE VARIABLE EINRICHTEN 

26A0 Fl POP AF [TYP NACH A ZURUECK 

26Ai E3 EK (SP),HL [ RIECKSPRUH6ADRE8SE NIEDER IN STACK, POINTER ZURUECK 

26A2 £5 PUSH HL [POINTER RETTEK 
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2bK CS 
2M4 tF 
2U5 Oi M 
2&A7 05 
ZU8 03 
2U9 03 
2UA 03 
26AI 2A FD 40 
2UE ES 
2UF 09 
2&I0C1 
2AB1 ES 
2&B2 CS 55 19 
2&HE1 
2bih 22 FB 40 
2&B9 iO 
Z&M&9 
26BB 22 FB 40 
266E 2B 
26BF Zb 00 
2&C1 DF 
2M:2 20 FA 
26C4 Dl 
2iC5 73 
2bU 23 
2bCl Dl 
2W:B 73 
2&C9 23 
2U:A 72 
2UB EB 
2KZ 13 
2US El 

2u;e a 



26CF 57 
26D0 5F 
2ftBl Fl 
2&D2 F] 
26S3 E! 
2iD4 C9 



26D5 32 24 41 
26D8 CI 
2«9 i7 
2&BA &F 
26DB 22 21 41 
26DE E7 
26DF 20 Of> 
2iEl 21 23 19 
2f>E4 22 21 41 
2iE7 El 
2AE8 C9 



2iE9 E5 
26EA 2A AE 40 
2UD E3 
2iEE 57 
26EF D5 
26F0 C5 
26F] CB 45 IE 
2^4 CI 
24F5F1 
26Fi EB 
26F7E3 
26FaE9 
26F9 EB 
26f A 3C 
2iFB 57 
2iFC 7E 
2ifB FE 2C 
2&FF 28 EE 

2701 CF 

2702 29 

2703 22 F3 40 

2706 El 

2707 22 fl£ 40 



PUSH 

LB 

LO 

PUSH 

INC 

INC 

INC 

LD 

PUSH 

ADD 

PDP 

PUSH 

CALL 

POP 

LD 

LD 

LB 

LD 

DEC 

LD 

RST 

JR 

POP 

LD 

IHC 

PW 

LD 

INC 

LD 

EX 

INC 

POP 

KT 



BC 

e,fl 

B.OO 
BC 

BC 
BC 

BC 

HL, (40FD1 

HL 

HL,BC 

BC 

HL 

1955 

HL 

(40FD),HL 

H,B 

UoFBl.HL 

HL 

(tl),00 

18 

NZ,2iBE 

DE 

(HL»,E 

HL 

K 

tHL),E 

HL 

(KL),D 

DE,HL 

BE 

H 



jVAfiWUE fiETTEN 

iTYP IttCH C 

;IL(£N6E DES KRTES MCH BC) 

;KTTEI( 

It 3 EffilBT SESAnTLAEHSE 



jMRAYTABELLEHENDE LASEH 

;IIND RETTEH 

|6ESAHTLA£H&E ADDIEREN 

;UERTLAEN6E ZUMECK 

;ICUES ARItAYTABELLEttENDE RETTEH 

;PLATZ FLIER VARIABLE DURCH VERSCHIEBEN BER MRAVTA6ELLE HACHEN 

;NEUES ARRAYTABELLEHEHDE ZURUECK 

iUND ABSPEICHERN 

;N£UER ARRAYTABELLEANFANS HACH BC 

iUND ABSPEICHERN 

{VARIABLE LffiSCNEH 

j(K BEIHHALTET VARTABADRESSEI 

;FERTI6? 

jHEIH, KITER 

;TYP HAGH E ZURUECJC 

; ABSPEICHERN 

;ZEI&ER IKC. 

;NAnE ZURUECK 

;ABSPEICHERNi 2.ZEICHEH 

;ZEI&ER INC. 

;1.ZEICHEH 

ilOTADRESSE NACH DE 

iPOINTER ZURUECK 



VARPTR-VARIABLE NICHT IN TABELLE 



LD 

LD 

POP 

POP 

EI 

RET 



D,A 

flF 
fSP),HL 



r IN TABELLE 
;VARTABABRESSE ' 
;(FLAe FUER VARPTR) 
;STACi; K0RRI6IEREN 



;RUECKSPRUWADRESSE RETTEN, POINTER ZURUECK 



VARIABLE IN AUSDRUCK NICHT IN TABELLE 



LD 

POP 

LD 

LD 

LD 

RST 

JR 

LD 

LD 

POP 

RET 



(4124), A 

BC 

H,A 

L.fl 

(4121), HL 

20 

HZ,2tE7 

HL,192B 

(4121), HL 

HL 



0, FUER SIN6LE UND DOUBLE 



;I=0, LEERSTRIH6: K > 

jSTACKKDRREKTUR 

jI'O, FUER INTE6ER 

i(H = 0) 

;(HL NACH X) 

; STRING? 

;NEIH 

;STRINfiZEIGEfi AUF LEERSTRINE NACH I 

; POINTER ZURl^CK 

;S(FORT ZUR AUSDRUCKSANALYSE, DA RUECKSPRUH6ADRESSE NICHT ZURUECK 



ARRAYVERHALTUN6 
nJSH HL 



LD 

EX 

LD 

PUSH 

PUSH 

CALL 

POP 

POP 

EH 

EI 

PUSH 

EX 

IHC 

LD 

LD 

CP 

JR 

RST 

LD 
POP 
LD 



HL,(40ft£) 
(SP},HL 

St* 

BC 

1E45 

BC 

AF 

DE.HL 

(SP),HL 

HL 

DE,HL 

A 

D.fl 

A,{HL) 

2C 

Z,2&EF 



(40FJ),HL 

HL 

(40A£),HL 



{POINTER REHEN 

{DIN-FLA6 UND TYP LADEN 

;RETTEN tUESEH REKURSIVITKT) 

iDinZAEHLER = 

jDINZAEHLER RETTEH 

IVARNAW RETTEN 

jIHDEIAUSDRUCK AUSMERTEN, 6ANZZAHLI6ES ERSEBNIS « 327&8D) NACH BE 

tVARHAHE ZURUECK 

IDINZAEHLER NACH A ZURUECK 

{INDEX NACH HL 

;FLA6 ZURUEU UND INDEX RETTEH 

{DIN-FLAB UND TYP RETTEN 

{POINTER ZWUECK 

{DinZAEHLER * 1 

{NACH D 

{ZEICHEN LADEN 

!= ' .'' 



{JA, WITER 
{5YNATICHECK: 



POINTER AUF ')'? 
) 



{POINTER ABSPEICHERN 
{Din-FLAG UND TYP ZURUECK 
{UND ABSPEICHERN 
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270A B5 PUSH H jDINIflEHUfi RETTEB 

270I2AF6 40 LS HL.UOFfi) ;AliRAyTABANFAN6 LADEN 

270E JE 19 L» A,l9 

i?!f « K'* "'■•"^ ifiRRAYLAEHBE AUF ARRAYTABZEIBER ADDIEREN) 

?^ ? !? .« .. " ''E'"'- lEME M" ARRAHABCaE EMEICHT? 

2711 2A FD 40 LD HL,(40FD) 

2714 EB EK M HL 

2715 DF RST 18 

2716 H AF 40 LD A, (40HF) jTYP HACH A 

2719 28 27 Jfi Z,2742 [JA, NICHT 6EFUNDEN 
271B BE CP (fn.) )« hP AUS TAMLLE? 
271C 23 I)K HL iARfiflYTABZElBER IK. 
271D 20 08 JR NZ,2727 ;N£IH, HAtCHSTES ARRAY 
271F 7E LD fl.lHL) i2.ZEICHEIt AUS TABELLE 

2720 B9 CP C jr S.ZEICHEK BESUCHTEH ARRAYS? 

2721 23 INC HL jAftRAYTABZEI6ER INC. 

2722 20 04 JR NZ,272B ;KIH, tWECHSTES ARRAY 
2724 7E LD aJhL) il.ZElCHEN AUS TABELLE 

^W }? ., ^^ ^ f= I.IEICHEN 6ESUCHTEN ARRAYS? 

2726 3£ 2 J LD A, 2! 

(2727 23 INC Hi {ARRAfTflBZEISER AUF l.ZEICHEN) 

2728 23 INC HL jARRAYTABZElBER AUF ARRAYLAEHSE 

2729 5E LD E, (HL) gARRAYLAENGE LADEN 
272A 23 INC Hi 

272B 56 LD D.lHLl ;(HSB) 

?^?£ 1} r. ^^ ^ (ARRAYTABZEI6ER IW. 

272B 20 EO JR NZ,270F ;NEIH, NAECHSTES ARRAY 

ARRAY BEFUNDEH 

272F 3A AE 40 LD A, (40AE1 ;0IH-FLA6 KSETZT? 

2732 87 OR A 

2733 IE 12 LD E.12 jDD-ERROH-COOE NACH E 
2735 C2 A2 19 JP NZ,19A2 ;Jfl, DO-ERROR 

2738 Fl POP AF ;Dll)ZflEHLER NACH A 

V-,11 li „. , ^^ '"*■* !■ *^'"'- KR DIHEHSIONEN IN 6EF1MKHEN ARMY? 

273fl CA 95 27 JP Z,2795 jJA, HITER 

BS-ERRQR 

273D IE 10 LD E.IO fBS-ERROR-CDDE NACH E 

273F C3 fl2 19 JP 19A2 [ZUR FEHLER-ROUTINE 

NEUES ARRAY EIMRICHTEN 

2742 77 LD IHL),fl jTYP ABSPEICHERN 

2743 23 INC HL jARRflYTABZElBEB INC. 

V-,\i -f "■■* ^''* f-AENSE EINES ELENENTES I'^TYP) NACH DE 

2745 16 00 LD D.OO 

2747 Fl POP flf jDIHZAEHLER NACH A ZURUECK 

^748 71 LB (HL),C jARNAYWNEN ABSPEICHERNi 2.IEICHEN 

2749 23 INC HL ;ARRAYTfllZEISEft INC. 
274A 70 LD (HL),B ;1.IEICHEH 

Z74B 23 INC HL jARRAYTABZEIBER INC. 

274C 4F LD C.fl 

?nt5 9, *' '' ^'"-L 1963 fKEINE 2 I DIHZAEHLER BYTES FREI? --> OH-ERfiDR 

2750 23 INC HL sARRflYTABIEIBER UEBER ARRAYLAEIffiE 
V.li ?^. n. ""^ "L ;""" VORLAEUFIS UEBERBANSENJ 
2752 22 08 40 LD f40DB),KL jARRAYTABZEIBER ABSPEICHERN 

2755 71 LD (HLt,C jDIHZAEHLER flISPEICHERN 

2756 23 IHC HL jARRAYTABIEieER INC. 

2757 3fl fl£ 40 LD fl,(40flE) iDin-FLA6 IN CY 
275fl 17 RLA ' 

2756 79 LD fl.C fDIHZAEHLER HACH A 

275C 01 OB 00 LD BC.OOOB ;TIEFE DER DIREHSION - IID 

275F 30 02 JR HC,2763 ;kEIN DIH? --> SPRW6 

IIH ^l ™^ ^^ i^IEFE DER DIHENSIOH AUS STACK NACH BC 

2762 03 INC BC ;M (FUER NULLINDEXl 

2?" 71 LD (HL1,C ;fl6SPEICHERN 

2764 23 INC HL jARRAYTABZEISER INC. 

2765 70 LD 1HL),B |(HSS) 

2766 23 INC HL jARRAYTABZEIBER INC. 

2767 F5 PUSH AF jDIHZAEHLER RETTEH 

2768 CD flfl OB CALL OBAA jLETZTE ARRAYNERTELAENSE I DIHENSIWSTIEFE 

!(AN AHFAN6 ■ LAEII8E EINES NERTES = TYPl 

?^?! tl ^^^ "'' JDIHZAEHLER 2URUECK 

VJi H . ^^ " f^-LE DIHEHSIONEN BEARBEITET? 

276D 20 ED JR NZ,275C jHEIN, ttlTEfl 

276F F5 PUSH AF iDIH-fLAB ICY) RETTEN 

"70 42 LD B,D jARRAYBERTELAEHK HACH BC 

2771 4B LD C.E 

2772 EB EK DE.HL jAUF ARRAYTABZE16ER (lEIST JETZT AUF ANFANG DER KERTEJ 
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2773 It 

2774 38 C7 
!77i CD &C 19 

2779 22 FD *0 
277C 2B 
277D3iM 
277F DF 

2780 20 FA 
27B2 03 

2783 57 

2784 2A Dfl 40 

2787 5E 

2788 El 

2789 29 
278A 09 

2781 El 
278C 2B 
278D2I 
278E 73 
278F 23 

2790 72 

2791 25 

2792 Fl 

2793 38 30 



2795 47 
27HAF 

2797 7E 

2798 23 

2799 it El 
(279A EI 
2791 5E 
279C23 
2791 % 
279E 23 
279F E3 
27MF5 
27A1 DF 

27A2 D2 3D 27 
27A5 CD AA 01 
27A8 19 
27A9 Fl 
27AA 31 
27AS 44 
27AC 40 
27H 20 E8 
27AF 3A AF 40 
27B2 44 
2713 41 
27M 29 
27IS U 04 
2717 38 04 
2789 29 
27IA28 06 
27K 29 
2711 17 
27BE E2 C2 27 
27C1 09 
27C2 CI 
27C3 09 
27C4 £1 
27CS 2A F3 40 
27C8C9 



ADD 

Jf) 

CAU 

LD 

DEC 

LD 

WT 

JR 

INC 

LD 

Lfi 

LD 

EI 

AU 

ADD 

EX 

DEC 

oec 

LO 

ItC 

LD 

IK 

POP 

JR 

AMESSE 

LD 

LI 

LD 

INC 

LD 

POP 

LD 

IKC 

LD 

IK 

EX 

nsi 

RST 

JP 

CALL 

ADD 

PW 

DEC 

LD 

LS 

JR 

LI 

LD 

Lfi 

ADD 

SUB 

JR 

ADD 

Jft 

ADD 

OR 

JP 

ADD 

POP 

ADD 

El 

LD 

RET 



HL.DE lADDIEREtl, UEKIHAUF? 

C,!73D [JA, BS-ERROIl 

im ;HICHT NEHR 8EIIUE6EMD SPEICKR FREI? --> OH-ERROR 

(40FD),HL ;HEUE ARRAVTABENIE A6SPEICHERR 

HL ;AffiAYWRTE LDESCHEHt 7EI6ER DEC. 

(HL],00 jO EIHSCHREIBEN 

18 ;AftRAYHERTEJVIFAH6 ERREICHT? 

Hl,277t ;K1H, KEITER 

BC ;ARRAV1€RTELAEK6E * 1 (FUER DIHZAEHLER) 

I A lO HACH D 

ri, (40DSI ilEIBER AUF DINZAENLER LADEH 

E.IhL) {DinZAEHLER MCH E 

DE.HL {HKH W. 

W. HL t 2 

Hl'.DC ;+ 2 t DIIIZAEW.ER ER6IBT HWffiE ARRArLAENS IN HL 

fiE.HL iNACH DE 

HL iARRAYTAIZEIBER AUF ARRAYLAENBE 

W. 

INL),E sARRAYLAEHBE AISPEICHERH 

a lARRATTABZElKR INC. 

(dl.D KHSB) 

W. lARMYTAIlEieElt IK. 

AF }DIN-FLA6 ZURUECK, DIN? 

C,27C5 ;JA, FEHTI6 

EIKS ARRAyElEHENTES ERHITTELN 



B,A 
Cft 
A.IH.) 
HL 

r 

E.IHL) 

ti 

D,(HL] 

hL 

ISPf.HL 

AF 

IS 

K,273D 

08M 

m.,fiE 

AF 

A 

l,H 

C.L 

NZ,279A 

A, (40AF) 

8,H 

iC.HL 

04 

C,27M 

M.,HL 

Z,27C2 

11, M. 

P0,37C2 

W.,K 
K 

HL.BC 
DE.HL 
HL, I40F3) 



;ARRA¥OFFSET = 

;ANZAHL DER SIHEHSIONEH MCH A 
;ARRAYTMZEIGER AUF TIEFE DER l.DIKHSIOH 

{ARRAYTABZEI6ER ZURIECK) 
;DlflEI£I{}NSTIEFE LADEH 
;ARMYTABIEI&Efi IK. 
;(nsil 

;ARRAYTABZEIBER RETTEN, INDEK HACH HL 

;DIHZAEHLER KTTEN 

jIHDEI >' TIEFE DER DIHEMSION? 

;JA, GS-EftRQR 

iARRAYOFFSET t TIEFE DER DIHENSION 

;+ IKDEI ER6IIT KUEH ARRAYOFFSET 

iDIHZAEHLER ZURUECK 

;ALLE DlflEKSIDHEN VERARBEITET? 

jKUEN AffiAVOFFSET NACH BC 

INEIH, UEITER 

IARRAVoFFSET t HERTLAENBE: TYPI LADEN 

jKUEH ARRAYOFFSET NACH BC 

]2 t ARRAYOFFSET NACH HL 

;STRIN8 ODER IKTE6ER? 

|jft 

{4 I ARRAYOFFSET NACH HL 

)S1N6LE7 -> SPRUM 

iDDtMLEi 8 t AIRAYDFFSET HACH HI 

{INTESER ODER DOUBLE? 

jJA 

;STM)«t 3 t AflRAYIFFSET HKH HL 

)Af»AnCRTEANFANG NACH BC 

jTYP t AMWYOFFSr AHIEREK 

;DIE DARAU3 OflEKNK ADRESSE DE5 ELEHEHTES NACH K 

{POINTER LADEN 



It 


NEH-FUNKTIM 






ER8IBT GROESSE DES FREIEN SPEICHERS 


27C9 AF 


lOR 


A 


ITVPI ' tDAHITKEINFK(AI)) 


27CA E5 


PUSH 


HL 


] POINTER RETTEN 


27CB 32 AF 40 


LD 


(40AF),A 


)TYP ABSPtlCHERH 


27CE CB M 27 


CALL 


27M 


)FRE hUFRUFEM 


27S1 El 


POP 


HL 


] POINTER ZURUECK 


2712 D7 


RST 


ID 


;NAECH5TES ZEICHEH 


27D3 C9 


RET 







tl FRE-FUMITim 

ER6IBT 6R0E5SE DES FREIEN SPEICHERS QQEIt DER FffilEH STRIKSPACE 
2714 2A FD 40 LD HL.MOFD) ;ANFAN& DES FREIEN SPEICHERS NACH HL 

27D7 E8 EI DE.HL {HACH DE 
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27D8 21 04 00 
Z7DB J9 
27K E7 
27DD 20 OD 
27DF CD M 29 
27E2 CB E& 28 
27ES 2A M 40 
2^8 EB 
27Ef 2A U 40 
27EC 7D 
27ED 93 
27EE if 
27EF 7C 
27F0 9fl 
27F1 67 
27F2 C3 U OC 



27FS » A6 40 



27FB 6F 
27F9flF 
27Fft 67 
27FB C3 9fl OA 



UP 



2819 E3 
281 A Eh 07 
2B1C 21 Al 18 
281 F 4F 

2820 06 00 

2822 09 

2823 CD 86 25 

2826 El 

2827 C9 



LD 

ADD 

RST 

JR 

CALL 

CM.L 

LB 

EX 

LB 

LD 

SUB 

LD 

LB 

SBC 

LD 

JP 



HL.OOOO 

HL,SP 

20 

NZ,27EC 

29BA 

28E6 

HL,(40AO) 

DE,HL 

HL, (40D6) 

.,1 

L,A 

A,H 



H.R 

OCU 



;STACKPOIHTER HACH HL 

;TYP TESTEK, SIRIH6? 

jNEIN 

;AR81MNTSTRIHS AUS ZHISCHENSPEICHER UND STRINBSPACE LQESCHEN 

;STRIKSPACE URSORTIEREN, 10ERFLUESSI8E STRINBS ENTFEMEH 

ISTRIWSPACEAI^AHE -- 1 NACH DE 

;ZEI6£R AUF LETZTES FREIE BYTE NACH HL 
iDIFFEKNZ DER BEIBEH 6R0ESSEH ERBIBT 
IJEKILS FREIEN SPEICHER 

i(NSB) 

|HL (INTEGER EHWE SIGN) ALS SINGLE HAUI I, FERTI6 



27FE CD A9 41 


CALL 


2801 D7 


RST 


2802 CD 2C 25 


CALL 


2803 E5 


PUSH 


2806 21 90 08 


LB 


2B09ES 


PUSH 


280A 3A AF 40 


LB 


280DFS 


PUSH 


28K FE 03 


CP 


2810 CC BA 29 


CALL 


2813 Fl 


POP 


2814 EB 


EX 


2815 2A 3E 40 


LD 


2818 E9 


JP 



PDS-FIMKTION 

ERGIBT CURStKPOSITDN 

LB A,(40A6) iCURSfltPOSITION LADEN 

UP ILDIA (l^<0044,HL) 

ZAHL ALS INTEGER (OWE SIGN! NACH 1 
1:A=ZAHL 

Dm, uimi 

LD L,A jNACH L 

m A -A ' 

LB H,A ;H > 

JP_ _0A9A J HL NACH I ALS INTEGER 

ItSR-FUKKTION 

fiUFT MSCHINENPRDGRMME AUF 

ALS PARANETER HERBEN AUSSER BEN ARGUBENT IN X, DER TYP IN A UND B£I STRINGS 

BER STRINGZEIBER IN BE UEBERBEKH 



41A9 
10 

252C 

HL 

HL,0890 

HL 

A,(40AF) 

AF 

03 

Z,29BA 

AF 

DE.HL 

HL, t408E) 

(HL) 



iBISK-BASIC-AUFRUF FUER USR N 
;NA£CHSTES ZEICHEN 
;ARBUflEHTAUSBRUCt( AUSNERTEN 
;PUINTER RETTEN 
iRUECKSPRUNGADRESSE SETZEN 
;1PDP KL. POINTER ZURUECC) 
;AR&UNENt STRING? 
;TYPX RETTEN 

;JA, LETZTEN STRING AUS ZNISCHEHSPEICHER UND STHINSSPftCE ENTFERKN 
(TYPX ZURUCCK 
iSTRINGZEIKR HCH DE 
iUSfi-UNTERPROERAm-STARTADRESSE LADEN 
;UND UNTERPRD6RANH ANSPRINGEN 



CXTYPA (AF.BC.DEl 

WRT IN BENUENSCKTEN TYP UHNANBELN 

IiA-SENUENSCHTER TYP 

ll=>IIERT 
Q:X=NERT IH GENUENSCHTEN TYP 



PUSH 

AND 

LD 

LB 

LD 

ABD 

CALL 

POP 

RET 



HL 
07 

HL.lBAl 

c.iS 

B.OO 
HLBC 
2586 

HL 



]VL KTTEN 

!TYP ' BOUSLE? --> ALS TABDFFSET 

jAHFANG DER SPR0M6TABELLE FISR TVPUWANDLUNe 

iTABDFFSET (=TYP, AUSSEfl BEI DOUBLE (0!) 

'NACH BC 

•AlF TABAHFANG ADDIEKN 

jKOCHflAL ADDIEREN, ABRESSE LADEN UND ANSPRINBEN 

;M. ZURUECK 





DIREKTMBE TESTEN 




2828 E5 


PUSH HL 


; POINTER RETTEN 


2929 2A A2 40 


LB HL, I40A2I 


lAKTUELLE ZNR LADEN 


282C 23 


INC HL 


;= FFFF? 


282B 7C 


LD A,H 


; IDIREKTWBE) 


282E B5 


OR L 




2B2F El 


POP HL 


{POINTER ZURUECK 


2830 CO 


RET NZ 


;NeiN, ZURUECK 




ID-ERROR 




2831 IE 16 


LD E,16 
JP t9A2 


; ID-EiffiOR-CDDE NACH E 


2833 C3 A2 19 


;ZUR FEHLER-ROUTIK 



STRJ-FUNKTIW 

ZAHL IN STRING IWORKN 
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2836 CD SD OF CALL OffiD :ZANL IN STfilK UNFOfMEH 

2839 CD 65 28 CALL 2865 ;5TRIN6 IN ZHISCHEMSPEICHER UND I UEBERNEHHEN 

28:C CD DA 29 CALL 29SA ;STIIIM6 AUS ZHISCHEHSPEICHEII LKSCHEN 

283F 01 2B 2A LD BC,2A26 ] RUECKSPflUffiADffiSSE SETZEN 

28A2 C5 PUSH K 

2843 7E LD A.ttfl.) ;STf1IN6LftENGE HACK A 

2S44 23 INC vi ;STRIN6Z£16ER HACH ING. 

2845 E5 PUSH HL |STRlN6ZEieE» RETTEN 

2846 CI BF 28 CALL 2aBF ;ftATZ FUER STRIM HIT LAEN6E A IN SIRIN6SPACE FREIHACHEN 
2849 El POP HL iSTRIH6ZEIBEfl ZURUECK 

2e4A 4E LD C.IHLI ;STRIN6AMESS£ LADEN 

284B 23 INC HL ;STR]NGZEIEER INC, 

2a4C 46 LD B.(HL) ;(ftSB) 

2fl4D CD 5A 2B CALL 2SM iSTRINCSPAKADRESSE IN V0RLAEUFI6EN ZdlSCHENSPEICHEfi UEBERTRA6EN 

2B50 ES PUSH W. ;ADft£SSE HS VORLAEUFIBEN ZHISCHENSPEICHERS I40D3) RETTEN 

2851 6F LD L.A |STRlN6LAEN6e HACH L 

2B52 CD CE 29 CALL 29CE ;5TRIH6 IN STRIH6SPACE U6ERHEHHEH 

2855 Dl POP DE iftDflESSE DES VORLAUEFIGEH ZNISCffiHSPEICHER ZWtUECK 

2BS6 C9 RET ;ZNISCHENSPEICHER IN I UEBERNEHHEN, FERTIB 



2857 CD Bf 28 


CALL 


283A 21 D3 40 


LD 


285D E5 


PUSH 


285E 77 


LD 


265F 2J 


INt 


2860 73 


LD 


2861 23 


INC 


2842 72 


LD 


2863 El 


POP 


2864 C9 


RET 



UP STEHPS (F.BC.OE.HLI 

ERHITTELT STRlNGSPACEAMESSE DKD LEBT SIE IH VDRL, IHISO£RSPEICHER AB 
IiA>STRlKGLAEHeE 

OtDEiSTRlNfiAHtESSE IN STRIH6SPACE 
HL'AMESK DES VORLAEUFIBEN ZHISCHENSPEICHERS 
STRIN6LAEH6E UND STRINGSPACEADRESSE IH VORL. ZHISCHENSPEICHER 

28BF iPLATZ IN STRIH65PACE FUER STRINB DER LAENSE A HACHEN 

HL,40D3 ;ADRE5SE DES VEffiLAEUFIEK ZUISCIEKSPEICHERS HACH HL 

HL ;<^TTEN 

(HL),A ;STRIN6LAEH6E A85PEICHERN 

Ifl. ;ZEI6ER INC. 

(HL),E iSTRlHGADRESSE IN STRINGSPACE ABSPEICHERN 

HL 

(HL),D ;{HS6I 

HL ;ADRESS£ KS VORLAUEFIEN ZHIBCHEHSPEICHERS ZWUEOC 



UP 



2B65 2B 
2866 06 
2B68 SO 

2869 £5 
2a6A OE 
2a6C 23 
286D 7E 
286E OC 
286F B7 

2870 28 

2872 BA 

2873 28 

2875 B8 

2876 20 
2878 FE 
2a7A CC 
287DE3 
287E 23 
287F EB 
2B80 79 
2881 CD 
2884 11 
2887 3E 
(2S88 
2889 2A 
23BC 22 
288F 3E 
2891 32 
2894 CD 

2897 11 
2B9A Df 

2898 22 
289E El 
2B9F 7E 
2SU CO 



F4 
22 
78 ID 



SA 2B 
D3 40 
» 
DS 

B3 40 
21 41 
OJ 

AF 40 
D3 09 
D6 40 

B3 40 



STRC (AF,BC,DE,HL=P) 

STRINeCDNSTANTE IN ZHISCHENSPEICHER UMD 1 UEBERNEHHEN 
I:iHL)..=STRINSKOttSTANTE 1(HL)> 1. ZEICHEN) 
0;STRIN6LAEN6E UND STRIN6AKESSE (HL) IN ZHISCHENSPEICHER 
UND 2EI6ER DARAUF IN X 



DEC 
LD 

LD 

PUSH 

LD 

INC 

LD 

INC 

DH 

JR 

CP 

JR 

CP 

JR 

CP 

CALL 

EX 

IHC 

EX 

LD 

CALL 

LD 

LD 

POP 

LD 

LD 

LD 

LD 

CALL 

LD 

RST 

LD 

POP 

LD 

RET 



HL 

B,22 

D,B 

HL 

C,FF 

HL 

A,(HL} 

C 

A 

Z,287B 

D 

Z,287B 

B 

NZ,2S4C 

22 

Z,107B 

(SPl.HL 

DE.HL 

2ll5A 
D£,40D3 

A.DS 

DE 

HL, (40B3) 

(4121), HL 

A, 03 

(40AF),A 

09D3 

DE,40D6 

18 

(40B3),HL 

HL 

A,(HL) 

HZ 



ZEI6ER VDR STRIH6 
TKHNZEICHENl ♦ 2 '"' 

STRlH6flDRESSE - 1 RETTEN 

ZEICtSNZAEHLER = -1 

IEI6ER INC. 

ZEICHEN LADEN 

ZEICHENZAEHLER IHC, 

= ZEILEHENDE? 

JA, STRIN6ENDE 

= TRENNZEICHEN2? 

JA, STRIH6ENDE 

= TREHNZEICHENl? 

NEIN, HEITER 

iLETZTES ZEICHEN '"? 

JA. NAECHSTES ZEICHEN 

STRIHGADRESSE - 1 ZURUECK, POINTER RETTEN 

STRIN6AMESSE HACH HL 

HACH K 

STRIH6LAEN6E HACH A 

.STRIH6 IH V0RLAEUFI6EH ZHISCHENSPEICHER EINTRASEH 

ADfiESSE DES VORLKttf'IGEH ZHISCHEN9>EIDtERS HACH DE 

,STRIN6ZEIB£R HACH DE ZURUECK) 

;HDHEHTANE ZHISCHENSPEICHERASRES5E HACH HL 

HACH X 

TYPX > STRIHS 

VORLAEUFIBEN ZHISCHENSPEICHER IH NAECHSTEH ZMISCHENSPEICISRPLATZ UEBERTRA6EH 
ZHISCHENSPEICHER VOLL? 

HAECHSTE ZNISCHENSPEICHERADRESSE ABSPEICHERN 
PAINTER ZlffitECK 
ZEICHEN LADEH 
HEIN, FERTIB 



ST-ERROR 
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28A1 IE 1£ LD E.IE iST-ERHOR-EDK NACH E 

28fl3 C3 A2 19 JP l*fl2 jIUfi FEHLER-RDUTIffi 



UP PRIHTS 



PRIHTS (AF,BC,D«(I0,E,HL=P1 
DftJCKT EINEN STfiIM6 



l!(HUl).."STRIN6 (DURCH '" ODER BEENDET) 

Di/ 

2M& 23 IK HL jZEIBER AUF ERSTES BYTE HS STRIH6S 

28A7 CB 6S 2S CALL 2S1,5 ;STR1H6 IN ZUI5CHENSPEICHER UNO X UEBERNEHHEM 

2eAA CD DA 29 CALL 29» ;STRIW AUS ZHISCHENSPEICHEfi LOESCHEN 

2SAD CB C4 09 CALL 09C4 )STRIH6«)RES5E NACH BC, STRIKBLAEME MCH B 

28B0 14 IK D iSTRINSLAEHeE t 1 

28fll 15 DEC D jALLE ZEICffiM 6EDRUCKT7 

2882 CB RET Z jJfl. IWUECK 

28B3 Oft LD A.IBCt jZElCHEM LflMN 

28B4 CD 2ft OS CALL 032A :AUS6EBEII 

2aB7 FE OD CP 00 ;= Cff 

2BB9 CC 03 21 CALL Z,2103 (JA, 4180 flUFRUFEH FUEfl DISK-BflSIC 

2aBC 03 INC K iZElSER INC. 

28Bfi 18 F2 JR 28B1 ;t€ITER 

UP HRMH IF.BC.DE.HL) 

PLATZ FUER STRING IN STRIN6SPACE NftCHEM 

I:A=STRIWLAEME 

Q:D£=STRIN6SPACEADRE5SE 

26BF B7 OR ft ;PACX-FLA6 LOESCHEN 

28C0 OE Ft LD C.Fl 

(2SC1 POP flF iPflCK-FLA6 ZURUECK) 

28C2 F5 PUSH AF ;UND RETTEK 

28C3 2A AO 40 LD HL, (40A0I iSTRI«6SPACEANFflN6 - 1 LADEN 

2BCi El E) DE,HL ;NACH DE 

28C7 2A D6 40 LD HI, (4006) ;STRIN6SPA{^ZEIGER NACH HL 

2eCA 2F CPL ;- BTRIN6LAENH - 1 HACK BC 

28CB 4F LD C,A 

2eCC Oi FF LB B.FF 

28CE 09 ADD HL,BC ;AUF STRIWSPflCElEIGER flDDIEREK 

2BCF 23 INC HL ;* 1, ERBIBT STftlWSPACElEIBER - STRIN6LAEN6E 

28D0 OF RST IB ;{ STRIWSPflCEANFflIK - 1? 

28D1 38 07 JR C,28I)ft ;Jft, SIRIIffiSPftCE PACKEN 

2803 22 D6 40 LD UOI}i},HL jNEUEN STRIN6SPACEZEI6ER AB5PEICHERN 

2SDi 23 INC VL ;* 1 ER6I6T STRIH6ADRESSE IN STRIN6SPACE 

2BD7 EB EI DE,HL ;NACH DE 

2BDB Fl POP ftF jSTRINftAENSE lURUECK 

2609 C9 RET 



STRIN6SPACE PACKEN 

28M Fl POP AF :P«K-FLft6 IlffiUECK, STRIN6SPACE SCHON 6EPACKT'' 

28DB IE Ifi LD E,1A ; OS-ERROR-EODE NACH E 

2BDD Cft ft2 19 JP Z,19A2 ;JA, OS-ERROR 

28E0 BF CP A iPKK-FLAG SETZEN 

2ffil F5 POSH AF ;UND RETTEH * 

28E2 01 CI 28 LD BC,2eCl ; RUE CK5PR0NSADR ESSE SETZEN 

28E5 C5 PUSH BC ;(NACH PACKEN ERKUT VERSUCHEN, OB 6ENUE6END PLATZ FUER STRIIK 

,-tlENN NICHT, DS-ERROR) 

2BE6 2A B! 40 LD HL,(40Bn jSTRIKSPACEZEIGER ' STRINOSPACEENDE 

28E9 22 U 40 LD (40D6),HL 

2BEC 21 00 00 LD HL.OOOfi ;HOEHSTER STRIN6ZEI6ER = 

2aEF E5 PUSH HL jAUF STACK 

2efO 2A flO 40 LD HL,i40AO) ;lfflECHSTER STfilNB = ANFSTRIM6SPACE 

2eF3 E5 PUSH HL ,-ftUF STACK 

HOECHSTEN STRIH8 OUTER ZHISCHENSPEICHERSTRIKGS 5UCHEN 

2BF4 21 B5 40 LD HL,40B5 jZBISCHEWPEICHERANFftNB NACH HL 

2SF7 EB EI DE.HL ;AWE5K DES NAECHSTEK FREIEH ZHISCHEN5PEICHE8PLATZES NACH DE 

2BFe 2A S3 40 LD HL, (40B3) 

28FB EB EI DE,HL 

2BFC DF RST 18 jZHISCHEHSPEICHER FERTIB? 

28FD 01 F7 2B LD BC,28F7 jRUECKSPRUIBADflESSE FUER NAECHSTEN ZNISCHEKSPEICHERPIATZ SETZEN 

2900 C2 4A 29 JP NZ,294A )NEIH, HOECHSTEN STRINfi AKTUALISIEREN 

HOECHSTEN STRIH6 UNTER EIHFACffiN VARIABLEN SUCHEN 

2903 2A F9 40 LD HL,(40F91 jANFANB DER VMTflKLLE NACH HL 

2904 EB £1 DE.HL ;AHFAN6 DER ARRAVTAKLLE NACH DE 
2907 ZA FB 40 LD HL, (40FB) 

290A EB EI DE,HL 

290B DF RST IB ]EWE DER VARTABELLE ERREICHT? 

290C 28 13 JR Z,2921 ;JA, AfffiATS UNTERSUCHEN 

290E 7E LD A,(HL) jTW AUS TABELLE LAHN 

290f 23 INC HL ; VARTflBZEIBER AUF KERT 
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»10 23 IK HL 

2911 23 INC HL 

2112 FE 03 CP 03 iSTRIBEVflBIMLE? 

2914 20 04 JR H.291fl ;HEIH 

2914 CB 4B 29 CftLL 2941 iHOECItSTEH STfilW flKTUALISIEREK 

2' ' " J" * 1* " ^ WJT ZEI6ER KICHT NDCHHAL ERHOEHT 

291fi 5F LD E,fl |TYP HCH DE 

2911 16 00 LD D.OO 

291D 19 ADD HL.DE j VflRTflBIEIGER UH TYP ERHOEHEN 

291E IS U JR 2906 ;I(EITER 

HOECHSTEH BTRIW IN flRRftYTflBELLE SUCNEK 

2920 CI POP K fSTMK KORRIfilEREN 

2?H?-,... " l*^***- iftfiRflYTftBELLENEWe IttCH BE 

2922 2ft FD 40 LD HL,(40FD1 

2925 El EI I1E,HL 

g" S » 29 5?' i!296B '^«rM^i«".»E.E««IC«.T7 



{JA, HKCHSTEH STRIH6 AH HKCHST HOECHSTER STaLE IN 
;5Tltlll6SPACE EIHSORTIEREN 



2««7E LD A.(HL) [ARRflYTtP LABEN 

S?J ?5 .. -„ '* "*- jflRRAYZElSEH INC. 

292C ED C2 09 CALL 09E2 jARRflYLAEME HACH K, ARRAYIEIBER AUF DIHZflEHLER 

?S^ S ^" "•■ ;ARRftYZEI6ER RETTEN 

«T?«At JS' Ut'"^ )* AMAYLAEBBE ER6IBT ANFANG DES HAECHSTEN ARRAYS 

SU K ?J ^ "^ fSTRlNBARRAY? 

2?1 2? U .. ■"• ^h^^** JHEIN. MECHSTES ARRAY 

2935 22 DB 40 LD (46B8),HL (ZEIBfR AUF BAECHSTES ARRAY ABSPEICHERN 

29M El POP HL jZEIBER flUF DIHAEHLER ZURUECK 

Sits.. '■" '^•'"L) 8IHZAEHLER LADEN 

2if £J " '■'' B,00 ;NACH BC 

29JC 09 ADD HL.BC (AUF DIBZAEHLERZEIBER 

293D 09 ADD HL.BC j2 I AOBIEREN ♦ 1 

29JE 23 INC HL ;E«6IBT ZEI6ER AUF ARRAYWRTE 

m, II BO 40 II H"f;SoBB. '^"^^ '"^ "^'''''' '"^" "^^ '^ 

2943 a EK DE.HL 

2*il S^ » ^^ ^8™ !«"*!' V0LLSTAEND16 BEARBEITET? 

Sf? ?? 5? « J** ^l292l ;JA, NAECHSTES ARRAY 

2947 01 3F 29 Lfl__^ ^^ _ iWtCKSPHlBBADfiESSE SETZEN (NAECHSTES ARRAYELEHENTt 

mm ERSETZH "" HOECHSTEH STRItlG VER6LE1CHEH WD, HENN IN STRINGSPACE HOEHER, 

2MA n PUSH BC jflUECKSPRUMSAORESSE RETTEN 

2?? if XOR A iSTRINBLAENGE = 0? 

294C B* OR (HL) 

2MB H IHC HL iSTRINBZEIOER AUF STRIHBADRESSE 

294F 2I IK &'"^' fSTRINOAORESSE LADEN 

2950 56 LD D, (HL) ,-(HSBI 

2951 23 IHC HL 

2«2 Ca RET Z jjfl, FERTI6 

2W3 " LD B,H iSTlilHeZEIBER HACH BE 

2954 4D LD C,L 

?S1 S " " LD HL,(40D6) }BTR1N6ADRESSE > STRIHBSPAEEPOIHTER? 

25? H ."^^ '^ i(STRIH6 SCHON NEU EINSORTIERT) 

2"; « LB H,B ;STRIN6ZEIBER HAEH HL ZURUECK 

295A 69 LD L,C 

ZWBM RET E (JA, FERTIB 

^ |1 rap HL ;RUECKSPRUH6ADft£SSE HACH HL 

SS S KT T'^ '?lfiiffiS*i?J?.!L^«'' f*^""! '"»"SE DES HOECHSTEH STRINGS HACH HL 

2** ^^ J8 ;ZU UNTERSUCHEHDER STRING HOEHER ALS HOECHSTER STRING? 

SS i ISsH iT'-* iSISSli iEm"' "^'^ ^' ""'""'*' =''*^"^' '^'^^'' 

"" " LD H,B iSTRIHBIEIBER ZURUECK HACH HL 

2962 69 LD L.C 

29" DO RET Ne ;NE1N, FERTIG 

2964 CI POP BC fRUECkSPRUNSADRESSE HACH BE 

2964 Fl POP % iAMESSE UHD ZEI6ER BES HOEEHSTEH STRINGS EHTFERNEH 

yHIi U ^u fr 'H^^ '* ^L.*"* *»ESSE DES 6ERADE UNTER5UCHTEN STRINGS 

2S S5 l^f^. ^ f'*'-S «UEN HOECHSTEH STRING AUF STACK 

?!t! 9o ^?* ^ iRUECKSPRUHSABUESSE AUF STACK 

™on E? KT 



HOECHSTEH STRIK EIHSQRTIEREN 
™B Dl POP DE jADftESSE DES HOEEHSTEH STRINGS HACH D£ 
w^ 7« ^ I"- !'^'*^ '*3) DES HOECHSTEH STRINGS HflCH HL 
296D7D LD fl,L jZEIBER = 0? 
2'4E M OR H ;(ALLE STRIHGS EINSORTIERT) 
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29iF CB RET I jJfl, FEfiTIB 

2970 2B KC HL iSTRIttSZEl^ m STRIKSADRESSE 

297Mi ID B,(Hll ;STRIKMWESSE LADEN 

2972 2B DEC HI 

2973 4£ LD C, IHL) j (LSB) 

WK E5 PUSH HL ;STRII16IEISER RETTEK 

2975 2B DEC HL ;STRIN6lAE»ISE LACEK 

2976 6£ LB L.IHU ;HACH HL 

2977 26 00 LD H,00 

2979 09 m> HL.BC jt STRllffiMRESSE 

297ft 50 LD C,B ;STRIHMI«ESSE MCH DE 

297B 59 LD E.C 

297C 2B DEC HL iSTfiI»6E«H NflCH HL 

2975 4* LD B,H jHACH K 

297E « LC C,L 

297F 2fl Di 40 LD HL,(40D6) iSTRIN6SPfiCEP0IHT£R NfiCH HL 

2982 C& SB 19 CALL 195B jSTRIHS UNTERHALB VDN STRIMSPftCEPDHfTER MSPEICHERM 

2985 Et PDF KL ;STRIKGZEI6ER ZIKIUECK 

2986 71 LD IHD.C jKUE STflIII6ADKS5E ABSPEICHERM 

2987 23 IK HL 

2988 70 LD (HL1,B (lltSBl 

2989 49 LD L,C ;NACH H 
298A 60 LD H,B 

298B 2B DEC HL ;- 1 ERSIBT HEOEH STftlKBSPflCEPD INTER 

29K C3 E") 26 3P 26E9 -.KEffiH STRlJffiSPKEPOIHTER hBSPEICHEMi WD HElTEfi 

STRINGVERKNIHPPUKE 

298F C5 PUSH EC jLflSTLEVEL RETTEN 

299(* E5 PUSH HL (POlHTEft RETIEH 

2991 2A 21 41 LD KL,(4]21) :i.STIiINSZEI6ER NACH HL 

2994 ET U (Sh.HL jPOIHTER lUfiUECK, l.STRIKeZEISER RETTEN 

2995 CD 9F 24 CALL 249F ;2.0PERWireil BEStimEN 

299B E3 EI ISPJ.W. ;POINTER RETTEK, l.STRINSZEIBER ZlfflUECK 

2999 CD F4 Oft CALL 0AF4 ;2. OPERAND KEIN STRIHfi? -> TR-ERRDR 

299C 7E LD A.IHLI ;l.STftINfi.AEI(GE LADEN 

299D E5 PUSH HL ;1'STRIKZEIBER RETTEN 

299E 2A 21 41 LE HL,(4121) !2.STR1H6ZEI6ER LADEN 

29A1 E5 PUSH HL jUW RETTEN 

29A2 86 ADD IHL) ;5TRIN6LAEN6EN ADDIEREN, SlffitE > 255D7 

29A3 IE IC LD E,tC jLS-EftKJR-COK NACH E 

29fl5 SA A2 19 JP C 19A2 "JA LS~ERR£Bt 

29AB CD 57 28 CALL 2^7 /pUTZ fUER VERIUNDENEN STRINB HACHEN, IN VORL. INISCHENSP. EINTR. 

29AB PI PDF 0£ ;2.STRIHGZE16ER ZIKUECK 

29AC CD DE 29 CALL 29M jS.STRlK KB laiSCHEItSPEICHER ENTFERNEN 

29AF E3 EX [5P),HL ;2.STRIR8ZEI&ER (HL) RETTEN WD l.STRINeZEI&ER HACH HI 

29M CD DD 29 CALL 29DB jl. STRING AUS ZHISCHENSPEICHER ENTFERNEN 

2963 E5 PUSH HL ;1.STRIN6ZEI8ER RETTEN 

29B4 2fi B4 40 VI HL, 141)64) ; STRltfiflMESSE MIS VORL. ZNIBEHENSP. LADEN 

29B7 EE EX DE.HL jHACH DE 

29B8 CD C6 29 CALL 29C6 jl. STRINB IN STRlNfiSPflCE UEBERNEHHEH 

29fie CD C6 29 CALL 29C6 ;2.STRIH6 MtilNTER IN STRIN6SPACE UEBERI^HKN 

291E 21 49 23 LD HL,2349 iRUECKK-RUNGADRESSE (AUSDRUCK NEiTER BEARBEITEN) 

29CI E3 EI ISP),HL ;HIT POINTER VERTAtlSCHEN 

29C2 E5 PUSH Vk. {POINTER KTTEK 

29C3 C3 84 28 JP 2884 jVORLftEUFlBEN WISCHEKSPEICHEft NACH I WD IN ZNI5CHENSPE1CHER 

STRING IN STRIttSSPACE UE^RtSmEH 

29Ci El POP HL ;fiUECKSPRUH6AMESSE MCH HL 

29C7 E3 EI tSPlfHL ;STftlH6IEISER NACH HL, RUECKSPHtWSftflRESSE MlEDEFl RETTEN 

29C8 7£ LD fl.lKL) jSTRINGLAEIffiE LADEN 

29C9 23 INC hL [STRIWZEIfiER INC. 

29CA 4E LD C,(HLJ jSTRINSAORES^ LADEN 

29CB 23 IK %. 

29CC44 LD B.IHL) ;{ffiB) 

29CD 6F LD L,A ;5TRIN6LAEN6E NACK I 

29CE 2C INC L ;* 1 

29CF 2S DEC L iSTRlHSLAEHBE - 1, FERTIS? 

29D0 C8 RET Z ;JA 

29D1 OA LD A. (BO M ZEIC«EN IN STRIN6SPACE IfEBERTRABEN 

29D2 12 LD (fiE),A 

29D3 03 INC BC iZEISER IK. 

29D4 13 INC DE 

29D5 10 FS JR 29CF jNEITER 

STRING WsllirSCHENSPEICHER UND STRIN6SPACE ENTFERNEN 

29D7 CD F4 Ofl CALL OflF4 fKEIH STRING IN X? -> TN-ERROF 

29DA 2A 21 41 LD HL, (41211 jSTRINGZEISER LADEN 

29BD EB EI CeX ;t/kZV. DE 

2VDE CD F5 29 CALL 29F5 jSTRINB OBERSTER IN ZHISCHEMSPEICHER'' -> ENTFERNEN 
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2?E1 El EI DC.HL ;ST(IIWZEI6ER MCH HL 

29E2 CO RET tIZ iNIOlT EHTFERHT? •-> FERTIB 

STR1M6 MS STflIH6SPACE EMTFERHEN 

29E3 B3 PUSH DE ;5TRIIt6ZEI6ER RETTEH 

TtH SO LD 6,1 ;STfiIIIGABKSSE NKH DE 

!«5 59 LB E.C 

2Kt, 18 KC K I- 1 

»E7 4E LD C,(HL> ] STRIHBLAEIKE MACH C 

29EB 2A DA 40 L6 HL,I40D6I jSTRIffiSPKEZEIBER HKN HL 

29EB DF RST 18 ■ STRIH6AMESSE - 1 

29EC 20 05 JR K.2WZ iNEIN, FERTIB 

27EE 47 LB B,1t |0 wbi B 

29EF Of ADD HL.BC ;STR]MeSPACEZE16ER * STRINGLAENGE 

2fF0 22 D6 40 LD t4DB6),HL (HIEDER ABSPEICHERH 

29FJ Et POP HL )STRIII62EI8ER ZWUECK 

2W4 C9 RET 

STRING AUS ZIIISC»€IISPEICHER ENTFERNEN 

27F5 2fl B3 40 LB HL,(40B3) jWECHSTE INlSCHEBPEICIffiRflDRESSE HflCH HL 

2fFa 2B DEC HL 

2fF9 ib LD B.IHL} iMWESSE VON LETZTEfl STRIH6 LADEN 

29FA 2B DEC Hi 

.29FB4E LD C,(HL) | (LSB) 

2ffC 21 DEC HL ilEIBER AUF LETZTE EtHTRAGUK 

29FD DF RST IB )= STRIK6ZEieER 

WE CO RET HZ ;r£IH 

29FF 22 B3 40 LD (40B3),HL fHEUEH ZEISER ABSPEICHERN, LETZTER EIKTRA6 6EL0ESCHT 

2A02 G9 RET 



tt LEH-FUWTIDN 

ERGIBT LAEHBE EIHES STRINGS 

2A03 01 FS 27 ID BC,27F8 jRUECKSPftUMADRESS SETZEN 

ZA06 C5 PUSH BC MA NACH It) 

2A07 CD 07 29 CALL 2fD7 )AR&UHEHTSTRING AIR ZHISCHEHSPEICWR UHD STRIWSPACE ENTFERNEN 

2A0A AF ICOR A jO HACH D 

2A0B 37 LB D,A ;(FUER VALI 

2A0C 7E LD A,IHL) ] STRIHGLAEN6E LAKH 

2A0D B7 Oft A ;UND TE5TEH 

2A0E C9 RET j HE ITER BE 1 27F8 

It ASC-FLMTION 

ERSIBT ASCII-CODE DE3 ERSTEN ZEICHENS EINES 5TR1H8S 

2A0F 01 FB 27 LD BC,27FB fRUECKSPRUNGADRESSE SETZEN 

2A12C5 PUSH BC jfAHACNI) 

2A13 CD 07 2fi CALL 2A07 [STRINSLAENGE = 0? 

2flli CA 4A IE JP Z,1E4A ;JA, FC-ERROli 

2Alf 23 INC hL ;STRINGZEIBER AUF STRIN6ADRESSE 

2A1A SE LD E,(Hl) jSTRINSADRESSE LADEN 

2A16 23 IHC W. 

2fllC 5i LD D,*HL) ;(LSfll 

2AtO lA LD A,(DE) }1.ZEICHER LAOEN 

2fllE C9 RET ;NEITER DEI 27FI 

tt CHRt-FUNKTIDN 

EfilEUBT l-BtTE STRING HIT ZEICHEN DESSEN ASCII-CODE DEN ARBUHENT ENTSPfilCHT 

2A1F 3E 01 LD A.Ol }STR1NBLAENGE « 1 

2A21 CD 57 2B CALL 2B57 jPLATZ IN STRINGSPACE FUER STRING NACHEN UND IN VDRL. ZNSP. EINSTR. 

2A24 CD IF 2B CALL 2B1F iGANZZAHLIGEN IIERT 6ES ARGUHENTES NACH E « 25iD) 

2A27 2A D4 40 LD HL, (40D4) jSTRlHGADRESSE AUS VORL. ZHISCHENSPEICHER LADEN 

2A2A 73 LD (hI),E ;ZEICHEN ABSPEICHERN 

2A2B CI POP BC {RUECKSPRUMGABRESSE ENTFERNEN 

2A2C C3 B4 2B JP 2GB4 ;VORLAEUFIGER ZHISCHEHSPEICHER NACH I UND IN ZHISCHENSPEICHER 

tt STRINGI-FUNKTIM 

ERZEU6T STRING AUS N &LEICHEN ZEICHEN 

2A2F D7 RST 10 ;HA£CHSTES ZEICHEN 

2A30 CF RST OB fSYNTAXCHECKi POINTER AUF '('? 
ZA31 28 ( 

2A32 CD IC 2B CALL 2B1C )STRIH6LA£H6ENAUSDRUCK AUSNERTEN, 6ANZZAHLIGEN TEll « 2UD) NACH E 

2A3S D5 PUSH SE |STRINSLAEHGE RETTEH 

2A3i CF RST 08 j SYNTAKCHECKJ POINTER AUF ','? 
2A37 2C , 

2A38 CD 37 23 CALL 2337 ;2EICHEHAUSfiRUCK AUSUERTEH 

2A36 CF RST Ofl ;S™taiCJ€CK! POINTER AUF ')'? 
2A3C 29 1 

2A3B E3 EK (SP),HL | STRINGLAEH6E NACH L ZURUECK, POINTER RETTEN 

2A3E E5 PUSH HL |STRIWLAEHGE RETTEH 

2A3F E7 RST 20 ;ER%BNIS DES ZEICHENAUSDRUCKES STRING? 
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2A40 28 OS 
2A42 CD IF 2B 
2A4S 18 03 
2A47 CD 13 2fl 
2A4A Dl 
2A4B FS 
2A4C FS 
M4D 7B 
2ft4E CD 57 28 
2AS1 SF 
2A52 Fl 
2A53 IC 
2A54 ID 
2A55 28 D4 
2A37 2A D4 40 
2fl5A 77 
2ASB 23 
2ASC ID 
2A5D 20 FB 
2A5f 18 CA 



2A41 CD DF 2fl 
2A&4 AF 
2AiS E3 
2Mi 4F 
2667 3E E5 
(2A6B E5 
2Ai9 E5 
2A6A 7£ 
2A6B B8 
2fi4C 38 02 
2Af)E 78 
26iF U 0£ 00 
(2A70 OE 00 
2A72 C5 
2fl73 CD BF 28 
2fi76 CI 
2A77 El 
2A7B E5 
2A79 23 
2A7A 46 
2fl7B 23 
2A7C 6i 
2A7D 68 
2A7E Oi 00 
2AB0 09 
2Aai 44 
2AS2 4D 
2A83 CD 5A 28 
2AB6 6F 
2A87 CD CE 29 
2ASA Dl 
2A8B CD DE 29 
2A8E C3 84 28 



JR 

CALL 

JR 

CALL 

POP 

PUSH 

PUSH 

LD 

CALL 

LD 

POP 

IMC 

DEC 

JR 

LD 

LD 

INC 

DEC 

JR . 

JR 



J:.2A47 

2filF 

2A4A 

2A13 

DE 

AF 

AF 

2^57 

'/ 

E 
E 

Z,2A2B 

ffL, (4004) 

(HL),A 

HL 

E 

N7,2ASA 

2A28 



iJA 

;NEIN, GAH22AHL1GEH KRT K 2560) NACH A 

;KITkR 

;ERSTES ZEICHEN DES STRINBS MACH A (ASC-FIMTIW) 

;STR1N6LAEME HACH E 

tZEICHEN 2 HAL RETTEN 

;PLATZ IN ETRIK5PACE FREIMCHEM IMD 

ISTR1K6 IN VOflLAEUFieEN ZNISCHENSPEICHER EINTRAfiEN 

{STRIM6LAEM6E NACH E 

; ZEICHEN ZURUECK 

;STRIHH.AEN6E ' 0? 

jJA. VOALAUEFieEN HISCHEH8PEICHER IN ZNISCHENSPEICffiR UND I 

;STitINeA»tESSE LAKN 

IZEICHEN EINSCHREIBEN 

;ZEI6ER INC, 

;STRIN6LAENGE AB6EARBEITET7 

INEIN, NEITER 

;V0RLAEUFI6EN ZHISCHENSPEICHER IN IMISCHENSPEICHER UHS I 



1) LEFTt-FlMTlON 

LIWIEN TEIL EtNES STRINSS ABTREWEN 
CALL 2ADF 



lOR 
EI 

LD 

LD 

PUSH 

PUSH 

LD 

CP 

JR 

LD 

LD 

LD 

PUSH 

CALL 

POP 

POP 

PUSH 

INC 

LD 

INC 

LD 

LD 

LD 

ADD 

LD 

LD 

CALL 

LD 

CALL 

POP 

CALL 

JP 



A 

c,a' 

A.ES 

HL 

KL 

A,(HL) 

B 

C,2A70 

A.B 

DE.OOOE 

ll^ 

2SBF 
K 

HL 
HL 

HL 

B,(HL) 

HL 

H,(HL) 

L.B 

B.OO 

hL.bc 

B,H 

2SSA 

2^CE 
DE 

29De 
2984 



[POINTER NACH HL, 'I' TESTEN UHD 2.AR6UKENT NACH I 
)LEFTOFFS£T IFUER RI6HTI UND NIDI) > 
IPOINTER RETTEN UND STfiIH6ZEI&ER NACH HL 
;LEFTOFFSET NACH C 

iSTRINGZEIBER RETTEN (STACKKORREKTUR BEI AH&PRUN6 VON USINfi) 
;STRrM6ZE16ER RETTEN 
ISTR1N6LAEN8E < ALS 2.AR8UHEHT? 

)Jfl, ER63TRIN6LAEN6E = STRIN6LAEN6E, LEFTDFFSET > 
]NEIN, ER8STR1N8LAENGE = 2. ARE 

(LEFTOFFSET = 01 

jLEFTOFFSET RETTEN 

;PLAT2 FUER ElieSTRIW IN STRIN6SPACE FREIHACHEH 

(LEFTOFFSET ZURUECK 

SSTRINBZEIGER ZURUECK 

;UND NIEDER RETTEN 

fSTRINGZEIBER AUF STRINBADRESSE 

iSTRIRSADRESSE LADEN (NACH HL) 

;(HSB) 
; (LSB) 
iLEFTOFFSET AUF STRINBADRESSE ADDIEREN 

;ERSSTRIN6ADRESSE NACH BC FUER TRANSFER IN STRINBSPACE 

fERSSTRIHB IN VDRLAEUFIGEN ZNISCHENSPEICHER E1NTRA6EN 

;ERBSTRIN6LAEME NACH L 

;ER6STRIN6 IN STRINBSPACE UEBERTRA6EN 

(STRINBZEIGER NACH DE 

;AR6WEIITSTRIN6 AlfS ZNISCHENSPEICHER UND STRINBSPACE LOESCHEN 

jVOfiLAEUFIBER IHISCffiNSPEICHER IN ZNISCHENSPEICHER UND NACH I 



II RIBHTI-FUNKTIM 

TRENNT RECHTEN TEIL EINES STRINSS AB 

?i'i «^? ^ '** L^L*- ™'' 5''°'*'™ NACH HL, ')• TESTEN, 2.ARB NACH B 

'"< Bl POP DE fSTRINBZEIffiR NACH DE ZURUECK 

2fl95 D5 PUSH DE jUND NIEDER RETTEN 

2Mi iH LD A,(DE) iSTRINBLAENBE - 2.AR6 

2fl'7 '0 SUB B jERBIBT LEFTOFFSET 

2A98 18 CB JR 2A65 fNEITER IN LEFTI 



2A9A EB 
2A9B 7E 
2A9C CD E2 2A 
2fl9F 04 
2AA0 05 
2AA1 CA 4A IE 
2AA4 C5 
2AA5 IE FF 
2AA7 FE 29 
2AA9 28 05 
2AAB CF 



II niDt-FUNliTION 

HITTLEREN TEIL EINES STRINSS ABTRENMEN 



EI 

LD 

CALL 

INC 

DEC 

JP 

PUSH 

LD 

CP 

JR 

RST 



DE.HL 

a.Ihl) 

2AE2 



Z,1E4A 
BC 

\f 

Z.2AB0 



; POINTER NACH HL 
(ZEICHEN LADEN 
:2.AR6 NACH B 

(2.ARB = 0? 

(JA, FC-ERROR 

;2.AR6 RETTEN 

(3.ARG = 2S3B (HEHN KEIH 3.ARB VORHANDEN, 6E3AHTER RESTSTRIN6) 

i= '!■? 



(JA, NEITER 
(SYNTAICHECKi 



POINTER AUF 
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2AAC 2C 
2AU CD IC 2B 
2AB0CF 
3U1 29 
2AI2 Fl 

mza 

2AH 01 69 2A 
2AB7 CS 
2AB8 3B 
2AB9BE 
2ABA Oi 00 
2ABC BO 
2ABD 4F 
2ABE 7E 
2ABF 91 
2AC0H 
2AC1 47 
2AC2 D8 
2AC3 43 
2AC4C9 



2ACS CD 07 2A 
2AC8 CA F8 27 
2KB SF 
2ACC23 
2AC6 7E 
2M:E 23 
2ACFU 
2AD0 6F 
2AB1 E5 
2AB2 19 
2A93 4i 
»B4 72 
2MHE3 
2AB&C5 
»B7 7E 
2AIIB CD 65 OE 
2ABBC1 
2ADC El 
2ABD 70 
2ASE C9 



2ADF EB 

2AE0CF 
2AE1 29 
2AE2C1 
2AE3 Dl 
2AE4 CS 
2AES 43 
2AE6 C9 



2AE7 FE 7A 

2AE9 C2 97 19 
2tfC C3 fi9 41 



tl 



2AEF CB IF 2B 
2AF2 32 94 40 
2AF3 CD 93 40 
2AFB C3 FB 27 



2flf B CD 0£ 28 
2ftFE C3 96 40 



UP 



2801 D7 
2602 CD 37 23 



CALL 
ftST 

POP 

ex 

LD 

PUSH 

UC 

CP 

LD 

RET 

LD 

LD 

SUB 

CP 

LD 

RET 

LD 

RET 



2B1C 



AF 

<SP},HI. 

BC,2A69 

BC 

A 

(HL> 

B.OC 

K 

C.ft 

A,(HL) 

C 

E 



;3.AR8AUSIWUCK ^RTEH, BANZZAHLI6EH UERT K 256) HACH E 
J3YKTAXCHECK! POIMTER A* ')'? 

) 
;2.AR& MACH A ZURtlECK 
{POINTER RETTEH, STRIWZEIKR ZtStUECK 
;RUECKSPfilM6H(tE5SE SETZEN 
lUtl LEFTt-FUNKTIOH SPRIHIEN) 
)2.AR6 - 1 EffilBT LEFTflfFSET 
}STRIN6LAEME < 2.Me7 
)ERGSTRIN6LAEHE ' 0? 
tJA. ERBSTRIW 1ST LEERSTRIH6 
;LEtTOFFS£T MCH C 
;STRIIIBLAEN6E - LEFTOFFSET < 3.AR6 



lERGSTRIHSLAEHBE ' DIFFERENZ 

;JA, BESAHTEN RESTSTRIffi ALS ER6STRIN6 UEBERHEHtlEH 

;NEIM, 3.AR6 ALS EfiSSTRIWLAEtta 

tZUR LEFTt-FUIKTIOl 



tt VAL-FU1KTI8N 

STRIKE IN ZAHL UMAHDELN 



CALL 

JP 

LD 

INC 

LD 

IK 

LB 

LD 

PUSH 

ADO 

LB 

LB 

El 

PUSH 

LD 

CALL 

POP 

POP 

LB 

RET 



2A07 
Z,27Fe 

H,(M.I 

k' 

HL,DE 

B,(HL) 

(n.),D 

(SP),HL 

BC 

A,(HL} 

0E65 

BC 

ttL 

(HL),B 



}STRIH6LAEMGE BES ARfiUHENTES > 07 
)JA, ALS INTE&ER HACH X, FERTI6 
tSTRINBLAEHfiE MCtt E 
iSTRIWZEISeil IK. 
iSTRIMSADRESSE HAUI HI 

; mi) 

I (LSBI 

ISTRIMGASRESSE RETTEN 

;STRIH6LAENGE ABIIEREH (D 1ST VM LEHl 

;ERSTES lEICHEK BES NAECHSTEH STftltKS LABEH 

IBURCH ZEILENEHSE ERSETZEH 

'f^r'PSSSS^I* ^^"^^1 BTRIN6ADRESSE DES HAECHSTEN STRIHBS RETTEN 

ll.ZEICHEII DES MECHSTEH STRlflSS RETTEN 

ll.ZEICNEN IN AKKU 

jSTRIHG IN ZAHL UMMMELN (HACH I) 

;1.ZEICHEN DES HAECHSTEN STRINBS ZURUECK 

;STR1H6ADRESSE BES MKCHSTEN STRINBS ZURUECK 

;1.ZEIC»EN HIESER ABSKICKM 



UP FltER LEFT*, RlSHTt, NISI 

EI K,HL jANSPRUNB LEFT* UNO RISHTti POINTER NACH HL 

ftST 08 ;SYNTAXCHECK! POINTER AUF ')'? 



POP 

POP 
PUSH 
LD 
RET 



) 

BC lANSPfiUNS KID*: RUECKSPRUNEADRESSE NACH BC ZURUECK 
BE ;2.AR6 HACH E ZURUECK 
6C ;RUECKSPRlUI6ADRESSe HIEDER RETTEN 
B,E ;2.AR6 NACH B 



FUNKTIONSTOKEN AUF LINKER SEITE BER ZtMEISUHS 

CP 7A !» HID«-TOKEH? 

JP HZ.1997 iKIN. SN-ERRDR 

JP__ ^i09 ]JA, HlBt AUF LINKER SEITE DER ZUMEISUH6 (NUR IN DISK-BASIC) 

IHP-FUNKTION 
EIH6ABP0RT LESEH 
CALL 2B1F 
LD (4094), A 
CALL 4093 
JP 27F8 



ISANZZAHLI8EH NERT « 256D) DES AR6UHENTES NACH A 
;1N If^-UNTERPROatAHH ALS PORTADRESSE ABSPEICHERN 
;INP-UNTERPR06RAHK IK RAH AUFRl^EN 
;AKKU ALS ER&EN8IS HACH X 



OUT-AHNEISUNB 

UERT AUF AUS8ABEPDRT AUS6EBEN 

'it'-'- W. i^^^E AReUHEKTE VON OUT AHALYSIEREN UND PORTADRESSE IN RAH ABLESEN 

_J_P__ «_« _ iRAH UNTERPROWAHH ZUR AUSFUEHRUN6 DER AUS6ABE AtfRUFEH 

INTEXP [AF BC DE HL=PI 

AUSDRUCK AU^^TEli UND ER6EBNIS IN INTE8ER UKMHDELN 
I:(HL*1)..=TEXT 
OiDE^ERSEMIS 
F'FLA8t ERGEBHIS < 0, S>1 

ERSEMIS < 256D, Z*) 
KT 10 iHAECHSTES ZEICHEH 
CALL 2337 ;AUSDRUCK AUSHERTEN 
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2M3 E3 POSH HL iPOWTER RETTEB 

mi, CD 7F OA CALl 0A7F ]EMCKN1S IN IHTEBER UMAHKLR 

2B09 EB EI DE,I«. ;EMEBHI3 MCH K 

2B0S El POP HL [POIBTER ZUfiUECK 

2m n U) A,0 ;FLA& SET2EN (S.O.) 

2B0C B7 Oft A 

2B0D C? RET 



2 ARBUKNTE FUEft OUT AMALTSIEREH 
2B9E CD IC 26 CALL 2B1C ; PORTADRESSENAUSDRUCK AUSNERTEN, eAHZZAHLIEEM WERT (< 2360) KACH A 

2B11 32 94 40 LD 14094), A (IH I)fP-UMTERPftQ6RAItn 

2B14 32 97 40 LD (4097), A ;UM fflJT-WITEfiPft06RAWl ABSPEICHERM 

2fll7 CF RST OS ;SYHTAICHE«! POINTER AUF ','? 

2Bia 2C , 

2Bt9 la 01 JR 2B1C ;Al]S6A6EHERTAtl5DRUC): AUSNERTEN, EANZZAtll&EN MERT t< 2560) MCH A, ZURUECI 

UP lEIPA (AF,BC,0€,HL<P1 

AUSDRUCK AUSKRTEN, ER6£BMtS IN INTEGER UmiAllDELN « 2S&D) 

i!{HLtn..«TEn 

a:A,E=ER6EBNIS 
2B1B D7 RST 10 ;NAECHSTES ZEICHEH 

2BtC CD 37 23 CALL 2337 ;AUSDRIiCK AUSKRTEN 

2B1F CO OS 2B CALL 2B05 ;ERBEBNIS IN INTEBER ifllHANOELN (NACH DE) 

2B22 C2 4A IE JP NZ,1E4A ;> 2560? -> FC-EBRQR 

2B23 28 DEC HL iPOINTEfi DEC. 

2B26 D7 RST 10 jKAECHSTES ZEICISH 

2S27 7B LD A,E ;ER8EB1IIS WO A 

2B2B C9 RET 



tt LLIST-BEFEKL 

PRQSRAKILISTDK AUF DRUCKER 

2S29 3E 01 LD A.Ol ;AUS6ABE-FLAB Al^ DRUCKER SETZEN 

2B2B 32 9C 40 LD (409C),A 

tt LIST-BEFEHL 

PROSRAnm.ISTINE AUF BILDSCHIRfl 

2B2E CI POP BC ;RUECK^UN6ADRESSE ENTFERNEN 

2B2F CD 10 18 CALL IBIO jBEIDE ARSUMENTE ANALYSIEREN U.ZEILENflDRESSE NACH BC, 2.INft IN STACK) 

2B32 C3 PUSH BC ;1.ZEIL£NADRESSE RETTEN 

2B33 21 FF FF Lfl Hl.FFFF jDlREKTlffiK SET:E» 

2B3i 22 A2 40 LD (40fi21,HL ;(AKTU£LLE ZNfl ' FFFF) 

2B39 El POP HL jl.ZEILENADRESBE NACH HL 

2S3A Dl POP DE ;2.ZNR NACH DE 

283B 4E LD C, (HL) ;ZEILENZEI6ER LADEN 

2B3C 23 INC HL 



2B5B 4fc l& 9, (HI) )(WSB) 

2B3E 23 INC kL 



2B3F 78 LD A, 8 i= 0? 

2640 Bl OR C i (PRQBRAtmENDE) 

2B4i CA 19 1ft JP I,lftl9 }JA, ZIB HAOPJSCHLEIFE 

2644 CI DF 41 CALL 41DF 

2B47 CD 9B ID Cftll. 1D9B 5SEHW5)HJ»G TOH TftSTE«B(W£ttEft WEIWEHD KS fiWLISTEHS 

2B4A C5 PUSH BC jNAECHSTE ZEILEKADRESSE RETTEN 

2B4B 4E LD C,(HL) :ZNR LADEN 

2B4C 23 INC KL 

2B4D 46 LD B,(HL) ;(NS6I 

264E 23 INC HL 

2B4F G3 PUSH BC jIW REITEN 

2B30 E3 EX (SP),HL jIEIBER RETTEH, ZNR NACH HL 

2831 £6 EI DE,HL i2.ZHR NACH HL, ZNR NACH DE 

2B52 DF RST 13 jZHR ? 2.ZNfl? 

2B53 CI POP BC jZEIBER NACH BC 

2654 DA IB lA JP C,lfil9 :JA, ZUR HftUPTSCHLEIFE 

2657 E3 EI (5P),HL -.lElGER AUF NAECKSTE lEILE KwCH HL. 2,IHf! RETTEN 

2B3B E3 PUSH HL ;ZEIKR AUF NAECHSTE lEILE RETTEN 

2639 C3 PUSH 6C iZEIBER RETTEN 

285A E3 EI DE.KL ;ZNR NACH HL 

2B3fl 22 EC 40 LD (46EC),)fl. lALS '.'-ZNR A6SPE1CHERN 

2BSE CD 6F OF CALL OFBF ;Z{JR fiJSBEBEN 

2B41 3E 20 LB A,20 tLEEBIElCHEN SftCM fl 

2SiJ El PGP HL iZEIGER NACH HL ZURUEOr 

2B64 CD 2ft 03 CALL 032fl jLEERZEICHEN AUSSEBEH 

23i7 CD 7E 23 CALL 2B7E jrtUS ;yiSCH£NCOEE LESStSEH TEXT EPZEU3E.V 

2S4A 2A A7 40 LD HL,(40A7) ;I/0-BUFFEfiANFfi/(S (= TEKTANFfiNG) NACH HL 

264D CD 75 23 CALL 2573 sTEIT AUSSESEN 

2B70 CD FE 20 CALL 20FE iCft ftUSGESW 

2873 13 BE JR 2S33 jKEITER 



UP PfilNTT (AF,HL) 
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2875 7E 
2B7i B7 

2B77 CS 
2B7e CD 2A 03 
2e7B 23 
2B7C le F7 



UP 



2B7E E5 
2B7F 2A 
2IS2 44 
2B93 4D 
2B84EI 
2885 16 
2187 18 
2889 03 
2I8A IS 
2SBI C8 
2B8C 7E 
2MI 17 
2HE 23 
2HF 02 
2B90 C8 
2891 F2 
2894 FE 
289i 70 
2898 OB 
2B99 0B 
2B9A 08 
^B OB 
2S9C 14 
^D 14 
2B9E 14 
2B9F 14 
2BA0 FE 
2BA2 CC 
2BA3 U 
2M7 E5 
2BM 5F 
2M9 21 
2MC 7E 
28ftD B7 
2BAE 23 
2BAF F2 
2IB2 ID 
2BB3 20 
2615 E& 
2BB7 02 
2Bt8 03 
2889 15 
2BBA CA 
2BRfi 7E 
2BBE 23 
2BBF B7 
2BC0 F2 
^3 El 
2K4 II 



fl7 40 



39 28 
FB 



95 
24 08 

7F 



50 16 



AC 28 



DB 28 

87 2B 
U 



2BC6 CD 10 18 
2BC9 DI 
2KII C5 
2KBCS 
28CC CD 2C IB 
2BCF 30 OS 
2BD1 54 
2IB2 SB 
2BI3 E3 
2BD4 E5 
2BD3 DF 
28D6 B2 4A IE 
28B9 21 29 19 



DfiUCKT TEXTSTfllie 

IMIU.),.>TE]ITSTRIW NIT ABGESCHLOSSEN 

0:(HL)=TEIT8E6)tEHZER (0) 

LO A,(M.) ;ZEICKEN LADEN 

Qfi A )" TEITEWC? 

8ET 2 ;JA, FERTIB 

CALL 032A glEICHEN AUS6EKN 

INC HI iZEIEER AUF NAECKSTES TEmEICHEN 

JR 2875 ;HE1TER 

6EKTIT (AF.BC.DE.HL) 

ERIEU6T AUS ZHlSOCHCOBES LESMWEN TEIT 

IilHL)..=PR06RAMZEILE IH ZHISGHENCOKS 

OiTEKT Id I/Q-IUFFER NIT AISESCHLDSSEN 

PUSH ML 

LD HL, (40A7) 

LD 8,H 

LB C,L 

FW Hi 

LB D.FF 

JR 2UE: 

IHC BC 

DEC D 

RET Z 

LO A, IHL) 

W A 

INC HL 

LD (BCI.A 

RET Z 

JP P.2B89 

CP FS 

JR tlZ,2BA0 

DEC BC 

DEC BC 

BEC DC 

DEC K 

IHC D 

IHC 

IHC B 

IHC 

CP 95 

CALL Z,0B24 

SUB 7F 

PUSH HL 

LD E,A 

LD HL,16S0 

LD A,(HLI 

M A 

IHC HL 

JP P,28AC 

DEC E 

JR NZ,2BAC 

AND 7F 

LD (BC),A 

INC BC 

BEC D 

JP Z,28DB 

LD A.IHL) 

IHC HL 

Oft A 

JP P,2BB7 

POP HL 

JR 28BC 



ICDKZEISER RETTEH 
jBUFFERZEIBER HACH BC 



ICOBEZEISER ZURUECX 

jHAIZEICNEH = 2S5B 

;KITER 

;BUFFERZEI8ER INC. 

IHAIZEICHEHDEC, BUFFER VOLL? 

;JA. FEAT 16 

tCWEBYTE LADEN 

;> ZEILEHEHBE? 

iCDDEZElKfi IHC. 

;IH BUFFER UEBERTRA6EN 

iJA, FERTIG 

jKlN TOKEN? "> NEITER 

)» '"-TOKEN 

'HEIN 

;:R£fl AUS BUFFER LOESCHEHt BUFFDtZEISER - 4 



ifMlZEICHEN *■ 4 



)" ELSE-TOKEN? 

iJA, ':' ENTFERNEHi BUFFERZEIBER DEC 

;TOfcEN - 7F ER6IBT HR. DEB KEyHBRDS 

;C0DEZEI6ER RETTEH 

;NR. DES KEYUORDS HACH E 

;ANFANG DER KEYHORDTAIELLE LABEN 

tZEICHEN LAI£N 

;ANFAN6 DES HAECHSTEN KEYNDRDS? 

iZEIGER IHC. 

)KIH, NEITEft SUCHEN 

;6EHEN3CHTES KEYWORD ERREtCHT? 

INEIN. MEITER SUCHEN 

;H0ftTANFAN6SMRKIERUHG DES ERSTEN ZEICHENS EHTFERNEN 

iZEICHEN IN BUFFER 

;6UFFERZEIGER IHC. 

;HAXZEICH£H DEC, BUFFER VaL? 

;JA, FERTIB 

;ZE1CHEN DES KEYHORfiS LADEN 

jZEI&ER AUF HAECHSTE5 ZEICHEN 

;1. ZEICNEH DES HAECHSTEN KEVHORDS? 

jHEIN, HEITER 

(CODEiEISER ZURUECX 

I HEITER 



BELETE-BEFEHL 
PRDGRANHZEILEN LOESCHEN 



CALL 

POP 

PUSH 

PUSH 

CALL 

JR 

LD 

LD 

EI 

PUSH 

RST 

JP 

LB 



IBIO 

DE 

BC 

8C 

1B2C 

HC,28D6 

B,^ 

ISP},HL 

HL 

18 

HC,1E4A 

HL,1929 



iBEIDE ARGUHENTE ANALYSIEREH (l.ZEILENABRESSE HACH K, 2.ZHR IH STACK) 
;2.ZHR HACH DE 
it.ZEILEHADRESSE 2 HAL RETTEH 

I2.ZEILEHADRESSE ERNITTaH, ZEIIE HICHT V0RHAHDEH7 

;JA, FC-ERROR 

lANFANe 6ER NAECHSTEH lEILE NACH DE 

ll.ZEILEHAOfiESSE ZURUECK, 2.ZE1LEHADRESSE RETTEH 
ll.ZElLENABRESSE RETTEH 
[l.ZHR <> 2.ZHR? 
)HEIH, FC-ERRDR 
IZEIBER AUF TEXT 'READY' 
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im CD A7 28 CALL 28A7 ;TEXT 'f£UY' WSfiEBEH 

7iW CI POP BC il.ZElLEHMItESSE HACH K 

2K0 21 E8 lA LD HL,1AE8 iffUECKSPRMMMESSE (lUR MUPTSCHLEIFEI 

2K3 £3 EI (SPhHL jRETTEN UM 2JE1LENAMESSE NACH HL 

2BE4 EB EI DE,hI ;2.ZEIIiMH£SSE MCN K 

2aE5 2fl F9 « LD HL, (40f9) {PROfiRAHHTEXTEWE MCH HL 

2SE8 lA ID A, IDE) (ZEICHEN LADEN 

2BE9 02 LD ik),tt )UM AKPEICHEM 

2BEA 03 INC K ZEIGER INC. 

2KB 13 INC DE 

2BEC DF ftST IB !Pf)06RAntlEHI£ EMEICHT? 

2BED 20 F9 JR HZ,2BEB ;NEI)I, KEITER 

2^0 6$ LD " '^ HELADRESSE ALS NEUES PROeRAmTEXTEHDE ABSPEICHERH 

2BF1 22 F9 40 LD liOF91,HL 

2BF4 C9 RET [ZUR HAUPTSCHLEIFE 

II CSAVE-BEFEHL 

PROSRAttH AUF CASSETTE AUFZEICHKN 

?S? ^? li ?,^ ??'■'■ *'^" JCASSETTENRECDRDER M. VORSPANN IMS SYNC. AUFIEICHMM 

2BF8 CD 37 23 CALL 2337 iFILEWMEMUSDRUCK AlBKRTEN 

2IFB E5 PUSH HL jPOlNTER BETTEN 

28FC CD 13 2A CALL 2A13 ,-STRIN6ADRESSE HACH DE 

2BFF 3E D3 LD A.D3 ;FILEHMtEHEADER AUFZEICHEN 

2C01 CD M 02 CALL 0264 |(3 KAL 03) 

2C04 CD 61 02 CALL 02il 

?C07 lA LD A.IDE) |1. ZEICHEN DES FILEHAflEN LADEN 

2C08 CD 64 02 CALL 0264 ;UND AUFIEICHNEN 

2C0B 2A A4 40 LD HL,(40A4) ; PRflGRAWTEXTANFANG HACH DE 

2C0E EB EK DE.HL 

2C0F 2A F9 40 LD HL,(40F9) iPROBHVMTEXTENDE HACH HL 

2C12 lA LD A, (DEI ;PR06RAH«TEnBTTE LADEN 

2C13 13 INC aE ZEI6ER IC. 

2C14 CD 64 02 CALL 0264 ;AUFZEiaMEH 

2C17 DF RST 18 )PR06««ltTEKTENDE ERREICHT? 

2C1B 20 FB JR HZ,2C12 iWlN, KITEfi 

2Clfl CD F8 01 CALL 01F8 i CASSETTEIWECORDEfl AUSSCHALTEN 

2C1D El POP HL ;PDINTER ZURUECI! 

2C1E C9 RET 



II CLOAD-BEFEHL 

PROGRAflfl VON CASSETTE LADEN 

2C1F CD 93 02 CALL 0293 jCASSETTEHREC ORDER AN UHD SYNC. SUCKN 

2C22 7E LD A.IHL) ;ZEICHeN LADEN 

2C23 06 B2 SUB B2 ■,'->'7 (NITO IN PRINT-TOKEN IMBENAMELTl 

2C25 28 02 JR Z,2C29 jJA, CLOAD? 

2C27 AF lOR A ;VERIFY-FLAG LOESCHEN 

2C28 01 2F 23 LD BC,232F 

(2C29 2F CPL ;V£8IFY-FL8 5ETZEN) 

(2C2A 23 INC HL ;POINTER INC.) 

2C2B F5 PUSH AF jVERIFY-FLAG'RETTEN 

2C2C 2B DEC B. jPOINTER DEC. 

3C2D D7 RST 10 ;NAECHSTES ZEICHEN, ANNEISUN6SENDE? 

2C2E 3E 00 LD A,OD ;FILENAMEN LOESCHEN 

2C30 28 07 JR Z,2C39 ;Jfl, KEIN FILENAHE 

2C32 CD 37 25 CALL 2J37 iFILEMHENAUSBRUCK AUSNERTEN 

2C35 CD 13 2A CALL 2A13 ;STf!IN6ADRESSE NACH DE 

2C3e lA LD A, (DE) |1. ZEICHEN DES F1LENANEN LADEN 

2C39 6F LD L.A -HACH L 

2C3fi Fl POP AF syERIFY-FLAe ZUfiUECK 

2Cn B7 OR A ;UND HACH H 

2C3C 67 LD H,A 

2C3D 22 21 41 LD (41211, HL jFlLENAHENWIO VEHIFY-FLA6 ABSPEICHERH 

2C40 CC 40 IB CALL Z,1B4D {KEIN VERIFY? --> NEH 

2C43 2A 21 41 LD HL,i4121) )VER1FY-FLA6 MD FILENAHEN LADEN 

^i^ B ., " ^1^ IVERIFY-FLAB MACH D. FILEHAHE NACH E 

2C47 06 03 LD B.OJ ;FILENAHEHEADER SUCHEN: ZAE1«.£R = 3 

2C49 CD 35 02 CALL 0235 [ZEICHEN VON CASSETTE LESEH 

2C4C D6 D3 SUB D3 ■= 03'' 

^tl ?S tl " "^I^"' I*i". i«HLER HIEDER AUF 3 ZURUECKSETZEN 

2C50 10 F7 DJHZ 2C49 ;'NOCH KEIHE DREl D3? --> HEITER 

2C52 CD 35 02 CALL 0235 ;FILENAHEN LADEN 

2C55 IC IHC E ;tM)K BEI CLQAO FILENAHE ANSEeEBEN? 

2C56 ID DEC E 

2C57 28 03 JR Z,2C5C tNEIN 

2C5V BB CP E j= SELADEHEH FILENAHEN? 

2C5A 20 37 JR HZ,2C93 ;NEIN 

PROfiRAHHTEU LADEN ODER NIT RESIDEHTEH PfiOGRAHTTEIT VERBLEICHEH 
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2nC 2A A4 40 LO HL,(40A4} gPROGRMHTElTMIFAM HMH HI 

2C3F Oi 03 LD B,» ;ZAEHLER = 3 

2U1 C9 35 02 CALL 023S ;IEICHEII VON CASSETTE LESEH 

2U4 5F LD E,A ;HACK E 

2CiS n SUB (k) j<> ZEICtCH AUS RESIDEHTEN PRDSRAflXTEXT 

2CU A2 AND D ;UND VERIFV-FLAS KSETZT? 

2C&7 :0 21 JR NZ,2C8A ;JA, VERIFV-ERRDR 

2U9 73 LD IHLl.E ;NElK, 6ELE5EHES ZE1D€II ABSPEICHERH 

2CU CD 6C 19 CALL \')bC [HIEHT BEHfi GEWffBEM SPEICHER? -> WKRROfi 

2C6I ^ LD A.tai ;ZElLENEtlDE (ODER IN ZNRI 

XUil DR A 

2C6F 23 IK HL gZEISER INC. 

2C70 20 ED JR HZ.2C5F ;NEIH, ZAEHLH HIEBER AUF 3 SETZEH 

2C72 CD 2C 02 CALL 02ic ;3TEM UHSCHALTEfl 

2C73 10 EA UHZ 2Cil ;HOCH KEIK 3 HULLEN? --> KITED 

2C77 22F9 40 LD (40F9),HL ;PROBMMITEITEHD£ A8SFEICHERN 

2t7A 21 29 19 LD HL,1929 )ZEI6ER MF TEIT 'READY' 

2C7I CD A7 2fi CAU 2BA7 [TEXT 'READY' AU56EBEK 

3£80 CO F8 01 CALL OlFB ;Cft5SEnEIKECDRIER AUS 

2C9I 2A A4 40 LD HL,(40A4) ;PR0BRMHTEXTANFAN6 AUF STACK 

ZCU E3 PUSH Ifl. 

2Ca7 C3 ES lA JP lAEB __ jSPfOSm ZUH ENDE DER HAUPTSCHLEIFE OAHIT ZEILEKZEISER ERNEUERT HERDER 

VEfilFY-ERROR 

2CeA 21 AS 2C LS HL,2CA5 {ZEIBH AUF TEIT 'IAD' 

2CBD CD A7 28 CALL 2&A7 ;TEXT 'BAD' AUS6EBDI 

2C90 C3 18 lA JP 1A18 ;ZUR HAUPTSCHLEIFE 

MECHSTES FILE SUCHEK 

ZC93 32 3E 3C LD (3C3£),A ;FILEHAK OES LEZTEN PROBRAflHES IN OBERE, RECHTE 8ILDSCHIRHECKE 

2C9i Oi 03 U 1.03 tflLEEHDE 13 MJUEH) SUCHEH: ZAEHLER = 3 

2C96 CD 35 02 CALL 0J35 ;ZEICHEH VOM CASSETTE LESEH 

2C9i B7 OR A ;= Mfl.L? 

2C9C 20 F8 JR *l,X% ;HEIH, ZAEHLER HIEDER AUF 3 

2C9E 10 FB DJHZ 2C9B ;HE)GH KEIK DREI NttLtEH? ~> KITER 

2CA0 CS 96 02 CALL 0296 ;AUF SVK. MRTEH 

2CA3 IS A2 JR 2C47 ;KITER 

TEIT 

2DU 42 41 44 OS 00 IAD.. 

It PEEK-FUHKTIDH 

INHALT EIHER SPEICHERZaLE LAKH 

2CAA CD 7F DA CALL 0A7F [AR&UKHT IM IHTE6ER UIMAHDELH IHACH HLI 

^1 7E LD A.im.) ;IMHALT lER BEHUBtSCHTEH SPEICHEfiZELLE NACH A 

2CAE C3 F8 27 JP 27F8 ;ALS ER6EMIS HACH I 

It P0KE-ANHEISIHI6 

tlERT IN SPEICttERZELLE SCHREIBEH 

2CB1 CD 02 21 CALL 2102 {ADRESSEHMJSSRI^K AU5UERTEN UHD ERGEBHIS IN IKTESR UtWAHKLN (HACK DE) 

2CI4 D5 PUSH K ;ADRESSE RETTEH 

2CIS CF RST OB {SYNTAICHECX: PQINTER AUF ',' 

2CI6 2C , 

2CB7 CS IC 2B CAU 2B1C (HERTAUSBRUGK AOSHERTEN, 6AHZZAHLI6E5 ER6EBNI5 « 2S6D) NACH A 

2C1A Dl POP DE ;ADfiESSE ZURUECK 

2CII 12 LD (SE),A ;IERT UHTER DIESER ADRESSE ABSPEICHERH 

ZCBC C9 RET 



tt USIN6-AHHEISUHE 
FORNATIERTE AUS6ABE 

2CID CS 38 23 CALL 2338 ;FGRnATSTR]H6AUSDMCK AUSUERTEH 

2CC0 CD F4 OA CALL 0AF4 {ERKBNtSKEIH STRIHS? -> TH-ERRDR 

2CC3 CF RST OB i SYHTAICHECKi POIHTER AUF 'j'? 
2CC4 3B t 

2CC5 El EI DE.HL {POINTER NACH K 

2CC6 2A 21 41 LD HL,(4121) ;STRIH6ZEI6ER LASER 

2CC9 IB 06 JR 2CD3 iHEITER 

NEITERE MS6A8EN HIT SLEICHEN FUMTSTRIHG 

2CCI 3A DE 40 LD A. MODE) jHAECHSTES ZEICHEH LAOEH 

2CCE B7 t» A ;= ANHEISUH6SEHE? 

2CCF 28 OC JR Z,2CDB ;JA, FC-ERROR 

2CI1 Dt POP DE jSTttlHZEIGER ZURUECX 

2CD2 EB EI DE.HL jNACH HL 

2CI3 E3 PUSH « HL {STRINGZEIKR KTTEH 

2CD4 AF IHt A ;L£TZTES ZEIOCH LOESCHEN 

2CI5 32 DE 40 LD t40DE),A 

2CSB lA CP D ;CDHTFLAG Z LKSCHEN UHD CT SETZEN 

2CS9 F5 PUSH AF ;M RETTEH 
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2CDA D5 


PUSH 


DE 


;P01HTER RETTEH 


2CBB4i 


LD 


B,(ll} 


JSTRIN6LAEH6E LADEN 


2CK BO 


OR 


B 


iSTRINGLAEHK ' 0? 


2CSS CA 4A IE 


JP 


Z,1E4A 
Hi 


;JA, FC-ERROR 


2CE0Z3 


IK 




2CE1 4E 
2CE2 2J 


LD 

INC 


C.CHL) 
Hi 


iSTRIHGADRESSE HACH HL LADEN 


2CE3 U 


LS 


H,[HL} 


iinsi) 


2CE4 69 


LD 


2i03 


) tLSBl 


2CES 18 IC 


JR 


jHEITER 




'I'-FELDLAEN6E BESTimtEH 


2CE7 5S 


LD 


k' 


;STRIH6LAeN6E NACH E 


2CE8E5 


PUSH 


;ZEIEER RETTEH 


2CE9 M 02 


LD 


C,02 


jZEICHEHAMZAHL = 2 (FUER BEGRENZENDE 'I') 


2CEB7E 


LO 


A,(HL] 


;ZEIC1»I LUEH 


2CEC 23 


IK 


;ZEI6ER IK. 


rCED FE 2S 


CP 


25 


I« '!■? 


2CEF M 17 2E 


JP 


Z,2E17 
2i 


]JA. FORNATIERTEN STRING AUS8£KN 
;» * '? 


2CF2 FE 20 


CP 


2CF4 20 03 


JR 


NZ,2Cf9 


;HE1N, FEHLER, KITER 


2CF& OC 


IK 


C 


;ZEICHEHANZAML IK. 


2CF7 10 F2 


DJNZ 


2CEB 


iSTRIHfiLAEHfiE BEC, > 0? -> HEITER 
iFEHLER IN 'I'-FELD: ZEI6ER ZIKUECK 


2CF9 El 


POP 


HL 


2CFft 43 


LD 


B,E 


;STRIII6LAEH6E ZlffiUECK 


2CFB 3E 25 


LD 


A,25 


\'V AUS6EBEH 




AHFAN6 EIKS STRIKG- 


ODER HUWERHFELBES SUCHEN 


2CFD CS 49 2E 


CALL 


2E49 


;'*' AUSSERHALB NUfflCRNFELD AUSBEBEH 


2IMQ CD 2A 03 


CALL 


032A 


jZEICHEN AUS6EKN 


2H3 AF 


IDA 


A 


■fl -- 


2M4 5F 


LD 


E,A 


jFELDLAENBE = 


2B05 57 


LO 


2^49 


IFDRNATFLAG = 


3>06 CD 49 2E 


CALL 


i'*' AUSSEIWALB HUmERHFELD AUSGEBEN 


2M9 57 


LO 


D,A 


;FDRMTFLAE NACH D 


2nA 7E 


LD 


A.IHL) 
HL 


jZEICHEN AUS STRING LADEN 


^OB 23 


IK 


;ZEI6ER IK. 


TDOCn 21 


CP 


21 


■='!'? 


^»£ CA 14 2E 


JP 


I,2E14 
23 


;JA, ERSTES lEICHEM VON STRING DRUCKEN 


2D11 FE 23 


CP 


2013 2B 37 


JR 


Z,2D4C 


;JA. NUHNERFELO ANALYSIEREN 
;STRIHGLAEWE - 1, ■ 0? 


2filS 05 


DEC 


B 


2D16 CA FE 2D 


JP 


I,2DFE 
2i 


iJA, STRIMEHDE 


2D19 FE 2B 


CP 


2D1B 3E 08 


LD 


A, 08 


iFORRATFLAG ' 8 


2DtB 28 E7 


JR 


Z,2D0f> 
HL 


jKITER 


2D1F 2B 


DEC 


;ZEICHEN HOCHNALS LADEN 


2D20 7E 


LD 


A.IHL) 
HL 




2021 23 


INC 




2022 FE 2E 


CP 


2£ 


1= •.'? 


2S24 28 40 
2026 FE 23 


JR 
CP 


Z,2DU 

25 


;JA. KACHKOnpASTELLENMZAHL BESTINNCN 


2D2S 28 BB 


JR 


Z,2CE7 

(HL) 


)JA. STRIK FDRMTIEREN 
;■ NAECHSTES ZEICHEN? 


2D2A BE 


CP 


2D2B 20 DO 


JR 


NZ,2CFD 


;NEIN, HEITER 


2D2B FE 24 


CP 


24 


2D2F 28 14 


JR 


Z,2D45 

2A 


;JA, FDRNATFLAG 5ETZEH 
j= 'tfl 


2031 FE 2A 


CP 


2D33 20 CB 


JR 


HZ,2CF0 


'HE IN HEITER 

■LETzfES ZEICHEN BOCH IH F0RNATSTR1N6? 


2035 7B 


LD 


2DU FE 02 


CP 




2038^3 


IK 


HL 


iZEIGER AlA" NAECHSTES ZEICHEN 


2D39 38 03 


JR 


C,2D3E 


;NEIN 


2D3B 7E 


LD 


A, (HL) 


jZEICHEN LADEN 


2D3C FE 24 


CP 


24 


.. 'I'? 


2D3E 3E 20 


LD 


A,20 
NZ,2D49 


jBIT 5 DE5 FMHATFLAe FUER 't' SETZEN 


2040 20 07 


JR 


jHElN 


2D42 05 


DEC 


B 


jSTRIH&AEHGE - 1 


2043 IC 


INC 


E 


jNUHHERHFELn.AENK IK. 


a44 FE AF 


CP 


AF 




I2D45 AF 


lOR 


A 


;F0RHATFLA6 LOESCHEN 


mi Cb 10 


ADD 


10 


jBIT 4 DES FORNATFLAGS FUER 't' SETZEN 


2048 23 


IK 


HL 


jZEIGER IK. 


2D49 IC 


IHC 


E 


INUMERNFELXAENGE IK. 


2D4A 82 


ADD 


D 


;FORIWTFLAS HIT LETZTEN FDRNATFLAfi VERKNUEPFEH 


2D4B 57 


LD 


D,ft 


iNACH D 


2D4C IC 


INC 


E 


jHUntEI^ELDLAEHGE INC, 


2MD OE 00 


LO 


C,00 


jAHZRHL DER HACHKDIWASTELLEK ' 


204F 05 


DEC 


B 


jSTRIN6LAENS DEC, = 0? 
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2D50 28 47 
2D52 7E 
2D53 23 
2DS4 FE 2E 
2D» 28 IS 
2DU FE 23 
29M 28 FO 
2DSC FE 2C 
2D5E 20 lA 
2DiO 7A 
2IUil Fi 40 
2063 57 
2D&4 13 Ei 



2DU 7E 

2D&7 FE 23 

2069 3E 2E 
20AI 20 90 
2D6S OE 01 
2UF 23 

2070 OC 
2S71 05 
2072 28 23 
2D74 7E 

2075 23 

2076 FE 23 
^78 28 F6 



2D7A D5 
2D7B 11 97 20 
2D7E OS 
2D7F 54 
2DB0 SO 
2081 FE SB 
2D83 CO 
2D84 »E 

2085 CO 

2086 23 

2087 K 

2088 CO 

2089 23 
2D8A BE 
208B CO 
2II8C 23 
2D8D 78 
2D8E D6 04 

2090 D8 

2091 01 

2092 Dl 
2M3 47 
2D94 14 
2S95 23 

2096 CA EB 01 
(2096 E8 
12097 
2099 7fl 
2D9A 21 
209B IC 
2D9C E6 08 
209E 20 15 
2H0 ID 
20A1 78 
20A2 B7 
20A3 28 10 
20A3 7E 
20A6 D6 2D 
20A8 28 06 
2DAA FE FE 
20AC 20 07 
2DAE 3E 08 
2010 C6 04 
2DB2 82 
2013 57 
2DB4 05 
2015 El 
2DB6 Fl 
2DB7 28 50 



01 



JR 

LD 

INC 

CP 

J8 

CP 

JR 

CP 

JR 

LD 

OR 

LO 

JR 



Z,2099 

A.IHL) 

hL 

2E 

Z,2070 

2i 

Z,204C 

2C 

HZ,207A 

2b4C 



;JA. FOfilMTSTRlHe AUS6EIEfiTE1, AUSBABE 
;ZE1CHEH LADEN 
iZEIGER INC. 

jJA, mm. DER HACHKORHASTELLEN ERHITTELH 



JA. NUmERNFELO HEITER AUSMERTEN 
= ' •■} 



NElll, 

BIT 6 



NimiERFELSENDPARAKTER AUSHERTEN 
VON F0RHATFLA8 FUER ',' SETZEN 



jKITEfl 



AKIAHL DER NACHKOWHSTELLEH KSTIHKN 

LO A,(HL) ;ZEICHEN LAOEN 

CP 23 i' 'I'? 

LB A,2E 

JR Ni.SCFO {NEIN, '.' AUS6EBEK 

LO C.Ol iZAEHLER FUER HACHKOHMSTELLEN > 1 (FU£R '.') 

IKC HL tZEISER INC. 

IHC C ;NACHKOI1flASTEaENIAEHLEi) INC. 

DEC fi tSTRIHeiAENS BEC., > 0? 

JR Z,2D99 ;JA, F«MTST81H6EUE, AUSSABE 

LD A.IHL) jZEICHEHLAKN 

INC HL ;ZEI6ER INC. 

EP 23 i= 'I'? 

JR Z,2D70 ;JA, KITER 



NUHHERHFELOENDPARAHETER AUSHERTEH 



PUSH 

LO 

PUSH 

LD 

LD 

CP 

RET 

CP 

RET 

IHC 

CP 

RET 

IMC 

CP 

RET 

INC 

LO 

SUB 

RET 

PDP 

POP 

LD 

INC 

IRC 

JP 

EI 

PDP 

LD 

DEC 

INC 

AND 

JR 

DEC 

LD 

OR 

JR 

LD 

SUB 

JR 

CP 

JR 

LO 

ADO 

ADD 

LD 

OEC 

PDP 

POP 

JR 



OE 

DE,2B97 

OE 

D,H 

li^ 

NZ 

(HL) 

NZ 

HL 

(HL) 

NZ 

HL 

(HL) 

NZ 

HL 

.V 

C 
OE 

DE 

;■• 

HL 
Z.OIEB 

DE.HL 

DE 

fl,D 

HL 

E 

08 

NZ,20B5 

I' 

Z,20IS 

A,(HL) 

2D 

Z,2DB0 

FE 

NZ,20B5 

A, 08 

04 

D 

0,A 

B 

HL 

AF 

Z,2E09 



{FORNATFLAG RETTEN 
;R(£CK5PRUH6ADRESSE SETZEN 

IZEIOER NACK OE 

;LETZTES ZEICHEN > UP MROT 

;NEIN 

;JA, NAECHSTEN 3 AUCtt? 

;HEIN 



flCIH 

;NE1N 

;STRIN6LAEN6E < 47 

;JA, 4 PFEILE IH6NDRIEREN 

;RUECKSPRIW6A0RESSE AUS STACK EHTFERNEN 

;FLA6 ZUitUECK 

iSTRimAEI^ ' 4 

;8n 1 VON FHtMTFLN FUER EKPDNENTENAUSGABE SETZEN 

IZEIEER IHC. 

;H1RB HIE AU36EFUEHf)T IIHC D) 

;ZEI6ER HACH HL ZURUECK) 

]FLAG ZORUECK) 

;F0RHATFLA6 NACK A 

;1EISER DEC. 

iHUmERNFELDLAENBE INC. 

i't'-BIT 6ESETIT? 

|JA 

;NUHHERNF£LDLKH6E DEC. 

;STRIN6LAEH6E = 0? 

]JA, F0RHATSTRIN6 AUSGEHERTET, AUSGABE 
; ZEICHEN LAl^N 

!»":: 

;= '♦■? 

tNEIH, AUS6AK 

{BIT 3 VON FORHATFLAS FUER '^' SETZEH 

;BIT 2 VOH FDRHATFLAO fm VORZEICHEN HIHTER ZAHL SETZEN 

]ZD fiESAnTFORNATFLAG ZUSAHNEHFUE6EN 

;NACH D 

iSTRINGLAEHSE - 1 

; POINTER ZURDEQ; 

;COHT-FLAG ZURUECK 

;AMIEISUN63ENBE? --> FERTII 
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^11 « IB^ B ;STRI»K.AEII8E IMP MCHKWWASTELLEH RETTEN 

5^11 ? POP DE ;FLA6 UM HUm€RHFELIK.A£N6E lURUECK 

Z ii £ If ;S'J,7igriS[i^"" "ACHKDHHflSmEN ZORIIEC. 

MCI E3 PUSH HL jPfllNTER HIEOEK RETTEH 

^2 « LD B,E iMUm£RIIFELW.«WE ttACH B 

2DC4 Bl ADD C 

iE£5 ?, I? .r ^'* " JSESAHTFELDLAEWE >■ 25D? 

2DC7 D2 4fl IE JP IIC.lE4fl JA. FE-ERROfi 

^Si Vl ^ '■'' \^ ;FD«IWTFLM BACH A 

?S?? rn « «c ??M i?^nr f^'^ ^ ^"^"1 '''""T UEBERHAliPT FOHMTIERT HIRB 

?^i ^rl !l fn ^.'*'-'- **^ J^**"!- J" FORMTIERTEH STRING UHHAWELN 

2D00 CB A7 2B CALL 2Bfl7 ;UHD DIESEK AUSBEBEH 

2M3 Ei POP HL ; POUTER lURUECK 

2Dp4 2fl DEC VL jPOIHTER DEC. 

™5 D7 RST 10 jHAECHSTES ZEICHEN, AHHElSUIffiSEMDE? 

SnU, W I,2DE6 |;y IH CDNT FLAB shzEN ™ CR) 

.^Si?? rl^ ,^n^ " "-D (40D£l,ft ;ZEICHEN ABSPEICHEBN 

2DDC FE 3B CP 3B i' ':"' 

2DDE 28 05 Jfi Z,2DE5 JA 

2DE0 FE 2C CP 2C i= ','' 

^2C2 97 19 JP NI,1997 ;HElit .SH-ERfiOfi 

^5 D7 RST 10 ;NAECKSTES 2EICHEII 

?SI^ r^i ^^ ^^ [STRIUGZAEHLER ZURUECK 

2DE7 EB EK DE.HL ;POIIiTER NACH DE 

2DEB £1 POP HL jSTRItlBZEIKR ZURUEEt: 

2D|A F5 POSH AF jCDNT-FLftG RETTEH 

2MB D5 PUSH DE tPOINTER HIEDER RETTEH 

wH! hi.. '*•'"'-' iWSPflUEHGLICHE STRIH6LAEHBE HftCH A 

2ME 23 iSc HL '" ^""*-^"* ^™'" ^"""^ ^^ VERARBEITETEH lEICHEN 

Wf, ^S "iL ^\ '"■-* iSTRlWADRESSE LADEN (HACH HLI 

iifry Zi INC HL 

2DF1 bb LD H.iHL) ;(HSF) 

2DF2i9 LD L,E -ILSB) 

2Ef3 16 00 LD D,00 ;ANZAHL DER VERARBEITETEH ZEICHEH 

Z^5 5F LD E.fl jHftCH DE 

'SA \l ff If '-MmSSST''' ""'' '^'^^^ "^ "^^^^"'"^^ 

2DF8 B7 (JR fl 

2DF9 C2 03 2D JP HZ 2D03 " jjfl, (fflTER 

2DFC 18 06 JR 2e54 -HEiH, FERT16 

FORRATSTRIHEENDE 

Wr.^ ?S ^1 ^^ ^l M :'"' ttfSSERHALB HOHHERKFELD AUSGEBEH 

2E01 CD 2fl OJ CALL 032fl jZEICHEH WJS6EBEH 

2E04 El POP HL jPOIHTER ZUftOECI! 

^^ li r. nr ''* '^ iCOHT-FLflB ZURUECK, flHUEISUHfiSEHDE? 

^^^t Sr « ^^i^ il , ^hB^ '^^\\ "^"^"STE ZaIiL hit BLEIEHEH FQRHATSTRIW FORHflTIEREM 

^Sll K ^^ ^^ 9^^ h^'^^^ !" '^ C0HT-FLfl6 6ESETZT? --> CR flUSBEBEH 

^?.^ ^l nr, .<, II , \FJ>^^ '^^^^^^ "ETTEH. STRIHBflDRESSE ZUROECK 

2E0D CD DD 29 CW^L 29DD ;FOR«ATSTfiIW AlJs STRIMBSPACE OHD ZHISCHEHSPEICHEft LOESCHEH 

^ f li ,n .. ^°^ ^ iPOIHTER ZURUECK 

2E1I C3 69 21 JP ^^ 2169 ^ ; flUSB ABE -FLAG AUF DISPLfly ZURUECK UHD FERTIB 

STRIff&FQRHATIEROHG 

^'J OE 01 LD C,01 iAHSPRUHG '!': ZEIEHENAHZAHL - 1 

2E16 3E Fl LD A.Fl 

^'^^^ PW f iAHSPRUH6 'V: STACKKQRREKTtW, lEICHEIWIZftHL IN C) 

2E1B05 DEC 8 ;STRIHGLflEKE -1 

2E 9 CD 49 2E CALL 2E49 ;'t' AUSSERHALB HUHHERFELD AUSGEBEH 

2E1C El POP HL fPOINTER ZURUECK 

SI 5 a r. ^^ '^ ;COI(T-FLAG ZURUECK 

^i! }f " ^^ ^1^^°' lAMKEISUKSEHK? --> FERTI6 

M 9. „ . P"S" B^ ;STRIII6LA£IIGE RETTEH 

^^i ^^ E E n^^,'- BJ iWSDRUCK AUSHERTEH (ZU FORHATIERENDER STfilHGl 

^l\ ?. " ^^ ^5> °5* iERSEBHlS KEIH STRIM? --> TH-ERROR 

5^« .^J ™P ^ JSTRIMLAEHSE ZURUECK 

2|28 C5 PUSH BC UW HIEKR RETTEH 

229 £5 PUSH HL {POINTER RETTEN 

^55 1^ ^' *' [I ™-l**'2" ISTRIHGZEIKR DES ZU FORHATIEREHMH STSIWS LADEN 

??? «i «« ,'■? ^'"^ {ZEICHENflHZAHL ALS 2.ARG FUER LEFTI HACH B 

aZE 0£ 00 LD C.OO jLEFTOFFSET » 

2E30 C5 PUSH BC ;BEIOE PARAHETER RETTEN 
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?I51 ^r". *.? ?"- i'!!:\ Vi!A ISTRIK FOWttTiERWi MS 1. ('!'! QKR DIE ERSTEK 7EICHEH VV) MTffiNNEH (LEFT!) 

2E34 CD M 2B CALL 28AA (FERMTIEATEN STRIU MSBEBEN 

2E37 M 21 41 LD HL, (4121) tSTRIHZEIBER KS FORMTIERTEH STRIHSS HACH HL 

2E3A Fl POP AF ]ZEICHEKAMZAHL NACN A 

^31 9& SUB tHL) iLAEHGE K5 FORMTIERTEN STfilHS - ZEICHEMNZAHL 

2E3C 47 LD B,A jDIFFEREMZ HACH B 

2E3I IE 20 LD A, 20 ;LEERZEICHE)I HACH A 

2E3F 04 IHC B )D1FFERE« = 0? 

2E40 05 BEC B BIFFEREHZ - t 

2E41 CA 03 20 JP Z.2DDJ JA, KITEfl 

2E44 CB 2A 03 CALL oi2A (LE^RZEJCHEN AUSGEBEN 

2£47 18 F7 JR 2E40 jHEITER 

UP Fl£R USINE 

2E49 F3 PUSH AF jAF RETTEH 

lEW 7A LD A,D ;BIT IH FOfWATFLAG 8ESETZT? 

2E4B r OR A f IKMW HUR 't'-BIT SEIM) 

ZE4C 3E2B LD A.2B ;'♦■ HACH A 

2E4E C4 » 03 CALL Ni,032A lift, AUS6EKH 

ZKl Fl POP AF »f ZURUEOt 

2E52 C9 RET 

EDIT-ANSPRUHS HACH SH-FEHLERH 

2E33 32 9A 40 LD (409A),A ;FEHLERCDD£ LOESCHEN 

2E96 2A EA 40 LD HL,(40&t) ;FEHLER-ZHR LAOEN 

2E59 B4 OR H •= FFFF? 

2E5A AS AMD L ;(DIREKTHODE) 

2E5B3C IHC R 

2E5C EB EI DE,HL ;FEHLER-ZHR WCH BE 

2E3E 11 04 JR JEi4 ;SPi«ltl6 IH EBIT-BEFEHL 

II EBIT-BEFEHL 

ZEILENEDITOR FUEf) PROSRAMIZEILEH 

2EM CB 4F IE CALL 1E4F }ZHR BECOOIEREN 

2|« CO RET HZ ;lCITEfiE ZEICHEH? --> lUWECK, FEHLER 

2E44 EI POP HL jRUECKSPRUMAMESSE EHTFERHEH 

2Ei5 EB II DE.HL ;ZHR ALS '.'-ZEILE ABSPEICHEfiH 

2EW22EC40 LD (40EC),HL 

2E69 EB El DE.HL 

?ltfl ^-5 ?£ 1^ ';*'■ ^^^^ '^f^LE in PfiOeRAHHTEn suchen, zeile vorhahmh? 

2E6D D2 D9 IE JP HC,1EII9 jBEIH, UL-ERROR ' 

^70 iO LD H,l {ZEILEHABRESSE MKH HL 

^23 IK d iZtlLEHZEIBER IMORIEREK 

2E73 23 IHC HL 

2E7* 4E LD C,(HLI ;ZHR LADEH (HACH BO 

2E75 23 IHC Hi. 

2E7t 4i LD B,(HL) ;[HSB) 

2E77 23 IHC Hi 

:E78 CS push BC ;ZHR RETTEH 

a79CB7E2B CALL 2B7E )COBE IH TEIT UtlAHBELH (IH I/D-flUFFER) 

2E7C El POP HL ;ZHR lumJECK (HACH HL) 

^n E5 PUSH HL lUNfi HIEKR RETTEH 

2E7E CB AF OF CALL OFAF {ZW AUS6EKH 

2E81 3E 20 LD A,20 ;1 LEERZEICHEH AUS8EBEH 

2Ea3 CO 2A 03 CALL 032A 

2EBi 2A A7 40 LD HL,(40A7) ; I /0-8UFFERAHFAH6 HACH HL 

2E89 3E OE LD A.OE ;CURS0R DM 

2E8B CB 2A 03 CALL 032A 

ZKE5 PUSH HL jI/Q-BUFFERAHFAHS RETTEH 

5|f ?f ^^ •■' C.FF [LAEH6E BER ZEILE BESTIfWEH: LAER6E = -1 

2E91 OC IHC C ;LAEHGE ♦ 1 

2E92 7E LD A,(HL) [ZEICHEH LADEH 

»« B7 OR A j= ZEILEMEHDE? 

^ti ^} .. '* "L (WFFERZ. IHC. 

395 20 FA JR HZ,2E91 jHEIH, HEITER 

^Vc H ^ "*- f^^SER AUF BUFFERAHFAHS ZURUECK 

2E98 47 LD B,A ;CURSORP0S = 

EIH6ABE, ZIFFERH VERARBEITEH 

2E99 16 00 LD D.OO jZAHL = 

W}r ^? II " ^*^'- "" i^^ NEUf" TASTEHDRUCK HARTEH, CODE MCH A 

2E9E U JO SUB 30 jZIFFER? 

2EA0 38 OE JR C,2EB0 HEIN 

ZEA2 FE OA CP OA 

2EA4 30 OA JR l(C,2EflO ;HEIN 

^W 5f LD E,A iZIFFER NACH E 

2£" ^^ LD fl,D (ZAHL I lOD: ZAHL HACH A 
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2EA8 07 
2EA9 07 
SAA 82 
2EftB 07 
SAC B3 

:ead 57 

2£AE 18 EB 



SB0E3 
2EB1 31 n 2E 
2EB4 E3 
2ES5 IS 
2E.U 14 
2EB7 C2 IB 2E 
2E.U U 
2EBB FE D8 
2EBB CA D2 2F 
2ECD FE DO 
2EC2 CA EO 2F 
2ECS FE FO 
2EC7 2B 41 
2EC9 FE 31 
2ECB 3B 02 
2ECD U 20 
2EW FE 21 
2ES1 CA Fi 2F 
2ED4 FE IC 
2EH CA 40 2F 
2ED9 FE 23 
2EDB 28 W 
2EDI FE 19 
2EBFCA 7D 2F 
2EE2 FE 14 
2eE4 CA 4A 2F 
2EE7 FE 13 
2EE9 CA a 2F 
2EEC FE 15 
2EEE CA E3 2F 
2EF1 FE 28 
2EF3 CA 7B 2F 
2EFi FE IB 
2EF8 28 IC 
2EFA FE 16 
2EFC CA 75 2F 
aFF FE 11 
2F01 CO 



2F02C1 
2Fe3 Dl 
2F04 CI FE 20 
2F07 C3 &S 2E 



2F0A 7E 
2F0B B7 
2F0C CB 
SOD 04 
2F0E CD 2A 03 
ffll 23 
2F12 15 
SI 3 20 F5 
SIS C9 



516 E5 

517 21 5F S 
Sift E3 

SIB 37 



S1CF5 
SIS CD 84 03 

520 5F 

521 Fl 
S22F5 

'7F2Z K ff 2F 
S26 7E 



RLCA 

fiLCA 

ADD 

RLCA 

ADD 

IS 

JR 



E 
2t9B 



;M 

;+ ZAHL 

iZIFFER ASDIERER 

|HEUE ZAHl > lOS t ZAHL * ZIFFER 

iNAECHSTE EIWABE AMMRTEM 



UHTERBEFEHLE ERKENNEN UNO AHSPRIH6EII 



PUSH 

LB 

EI 

DEC 

INC 

JP 

IHC 

CP 

JP 

CP 

JP 

CP 

JR 

CP 

JR 

SUB 

CP 

JP 

CP 

JP 

CP 
JR 
CP 

JP 

CP 

JP 

CP 

JP 
JP 

CP 

JP 

CP 

JR 
CP 
JP 

CP 
RET 



HL 

HL,2E99 

(SP),HL 

D 

S 

NI.SBB 

D 

K 

Z,SD2 

ob 

Z.SEO 

FO 

Z,SOA 

31 

C.SCF 

20 

21 

I.2FF6 

it 

Z,S40 

23 

Z,2F1C 

1* 

Z,2F7Il 

14 

Z,2F4A 

13 

Z.SfiS 

15 

Z.SE3 

:d 

Z,S78 

IB 

Z.Sli 

18 

Z,S75 

U 

NZ 



SPACE 
LD 

OR 

BET 

INC 

CALL 

IHC 

DEC 

JR 

RET 



A,(HL) 
A 
Z 
B 

032A 
HL 
D 
flZ,SOA 



;BUFFERZ. RETTEH 

jRUECKSPRlMSADRESSE NACH HL 

ifiUFFERZ. ZUftUECK, RIKCKSPRUNBADRESSE RETTEN 

[ZAHL > 0? 

;NEIN 

;JA, ZAHL > 1 

;EIH6EKKNES ZEIOSH = LEFT ARROU? 

)JA, BACKSPACE 

[■ ENTER? 

{JA. EXIT 

(■ ' ■? 

|JA, SPACE 
;KLEIHBltCHSTAIE? 

INEIN 

;!)( BROSSBUCHSTABEN UmANSELN 

;JA, CHANCEL DNS EXIT 

;Jft. LIST LINE 
[« 'S'? 
;JA, SEARCH 

;JA, IH^T 
!= 'D'? 
;JA. BELETE 
;■ 'c'' 
;JA, CKAN6E 

\ 



;JA, SAVE CHAN6ES AW EIIT 

I« '!'? 

;JA. EXTEHB LINE 

;- 'K-? 

;JA, SEARCH AND KILL 

;■ 'H'? 

;JA, HACK AW INSERT 

1" 'A'? 

;NEIH, NAECHSTE EIHSABE ABHARTEI 



CHANCEL AND RESTART 
POP BC 
POP DE 
CALL 20FE 
JP 2E&5 



jROECKSPRUHGADRESSE ENTFERNEN 
;ZNR ZURUECr 
;CR AUSBEBEH 
;NEUER ANFANB 



iZEICHEH LADEN 
;> ZEILENENDE7 
[JA, FERTI6 
;CUtlSDRPQS IHC. 
;ZEICHEH AUSBEBEN 
;BUFFERZEIBER INC. 
iZAHL NAL HIEDERHOLT? 
]NEIN, HEITER 



SEARCH AND KILL 
PUSH KL 
LD HL.SSf 
EI (SP),HL 
SCF 



;BUFFERZEI6ER RETTEN 

jRUECKSPRUNSASRESSE NACH M. (NACH KILL '" DRIKKEN) 
;BtJFFERZEI&ER ZURUECK, RUECKSPRUN6AWES3E RETTEN 
iKILL-^LAS SETZEN 



SEARCH 

PUSH AF jKILL-FLAS RETTEN 

CALL 0384 jCHAMKTER EIN6E&EN 

LD E.A )CHMt NACH E 

POP AF 1KILL-FLA6 ZURUECK 

PUSH AF ;IMD NIESER RETTEN, SESETZT7 

CALL C,2FSF ;JA, '!' AUSDRUCKEN 

LD A,(HL) (ZEICI^H LADEN 
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2F27B7 
2F78 CA 3E ZF 
2F3B CD ZA 03 
ff2E Fl 
ff2FF5 
2FM K fll 2f 
2f S3 3B 02 
2F35 23 
2F3i04 
2F37 7E 
TFZi Bl 
2F39 20 EB 
2F3B IS 
ffJC 20 EB 
2F3E Fl 
2F3F C? 



2F40 CD 73 21 
"SM CD FE 20 

2F46C1 

2F47 C3 7C 2E 



2F« 7E 
2F4B B7 
2F« C8 
2F4D 3E 21 
2F4F CO 2A 03 
2F52 7E 
2F53 B7 
2f54 28 0? 
2F5i CD 2A 03 
2F59 CO fll 2F 
2fK 15 
2F5D 20 F3 
2F5F 3E 21 
2F61 CD 2A 03 
2F44 a 



2Fi! 7E 
2FU B7 

2F67 C8 
2Fi8 CO 84 03 
2F6B 77 
2FiC CD 2A 03 
ff6F 23 
2F70 04 
2F71 15 
2F72 20 Fl 
2F74 C9 



2F75 34 00 
2F77 48 



2F78 lb FF 
2F7A CD OA 2F 



2F7D CD 84 03 
2F80 B7 
2FS1 Cfl 7D 2F 
2F84 FE 08 
2F8i 28 OA 
2FB8 FE OB 
2F8A CA EO 2F 
2F8S FE IB 

2FaF ca 

2F90 20 IE 
2F92 3E Oe 
2F94 05 
2F95 04 
TFti 28 IF 
2FM CD 2A 03 
2FW 2B 
2F9C 05 



M 

JP 

CALL 

POP 

PUSH 

CAU 

JR 

INC 

INC 

LB 

CP 

JR 

DEC 

JR 

POP 

RET 



A 

Z,2F3E 

032A 

AF 

tf 

C,2FA1 

C,2F37 

XL 

B 

A.fHLl 

NZ,2F2i 
B 

AF 



RlClfCH KCIICH, H 

ZEICHEH LOESUIK 
>l>f_HFFaZEI6ER UMD CURSORPDS NICHT IK. 



i' ZEILEHENBE? 

;JA. FERTIB 

IZEICHEN MU^H 

j KILL-FLAB ZURUEGK 

)UHD HJEDER RETTEH. 6ESETZT7 

;BUFFERZEI6ER INC. 
jCWSORPOS INC. 
;HEM5TES UlOftN LA&EN 
;= 6ESUCKTES ZEICHEN? 
{HEIN, WITER SUGHEH 
IZAHL NM. HIEDERHOLT? 
)HEIN, KITER 
;KILL-FLAG ZUitUECX 



LIST LINE 

CALL 2B75 ;BlFFEflIMHALT BIS ZEILENEHDE DRUCTEN 

CALL ZOFE ;CR AUSSEBEN 

POP BC (RUECKSPRUMABRESSE ENTFERHEN 

JP 2E7C ;ZM) NEU AUSHUCKEN UND HEITEN 



DELETE 

LB 

OR 

RET 

LS 

CALL 

LD 

OR 

JR 

CALL 

CALL 

DEC 

JR 

LD 

CALL 

RET 



fl,(HL) 

A 

1 

A,21 

032A 

fl,(HL) 

A 

Z,2F5F 

032A 

2Ffll 

D 

KZ.2F52 

A.Jl 

032A 



PUAMCC 

wmnoc 

LB 

n 

RET 

CALL 

LD 

CALL 

INC 

INC 

SEC 

JR 

RET 



EXTEND LINE 
LD D.FF 
CALL 2F0A 



I ZEICHEH LADEN 
1= ZEILEKEH0E7 
iJA. FERTIB 
;'!^ AUSfiEKN 

{ZEICHEH LADEN 

;= ZEILEHENOE? 

jJA, '!■ DRUCKEN UH FERTIB 

;ZElCHEN AUSBEBEH 

i ZEICHEH LOESCNEH 

iZAHL HAL HIEKRNfiLT? 

;NEIH, HEITER 

)'!' AUSBEBEH 



A,(HL> iZElCHEH LADEH 

A i= ZEILENEHDE? 

1 )JA, ZURUECK 

0384 ;ZE1CHEH EIN6EBEH 

(tl),A jFUER ALTE5 IN BUFFER ABSPEICflERH 

032A lUHfi AUSBEBEH 

HL jBUFFERZEIBER INC. 

B iCURSOfiPOSITIDH INC. 

D ]ZAHL HAL HIEDERHOLT? 

HZ,2Fi5 jHElN, HEITER 



HACK AND INSERT 
LD (HD.OO 
LD C,B 



SNAECHSTES ZEICHEN DURCH ZEILENEHDE UEBERSCHREIBEN 
;LAEH6E > CURSORPOS 



;ZAHL = 255 

jREST PER ZEILE AUSBMCKEl 



INSERT 

CALL 0384 jEIN ZEICHEN EIN6EBEH 

OR A iKEINS EIH6E6EH? 

JP Z.2F7D ]JA, HOCHML 

CP 08 {. LEFT ARRM? 

JR Z,2F92 ;JA, LETZTES ZEICHEN LOESCHEH 

CP OD )« feNTER? 

JP Z.2FE0 ;JA, EXIT 

CP IB )= UP ARRM? 

RET Z ilA FERTI6 

JR NZ.2FB0 ;NEIH, ZEICHEN EIHFUE6EH 

LD A, 08 ; BACKSPACE NACH A 

DEC B sCURSDRPDSITIOH > 0? 

JR Z,2FB7 ;NEIH, NEITER KEIH BACKSPACE HOEBLICH 

CALL 032A g BACKSPACE AUSBEBEH 

DEC HL jBUFFERZEIBER DEC. 

DEC B ;CURSOfH>OS DEC. 
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^?? ii ^^ ^^ '■^ °E>^'0 ifiUECKSPRlWMDRESSE SETZEN 

2FflO D5 PUSH DE ;()ttECHSTES ZEICHEN EINFUE6EK) 

UC FUER EDIT! EIN ZEICHEM ENTFERNEN 

2FA1 E5 PUSH HL jflUFFERZEISER RETTEH 

mi OD DEC C LflEHSE - 1 

ffj 7E LD fl.lHLl jIEICHEN LAHN 

2FM B7 OR ft (. ZEILENEME? 

^5? PA OA ™ W r ^ i™"^ "" RUECKKEHR SETZEN CFllEfi KILL) 

2Ffl6 M 90 08 JP Z.OMO ;Jfl lUWECK, VORWR BUFFERZEI6ER ZUWECt: 

ZFJ9 23 INC hL jNftlCHSTES ZElCHEN UMN 

y** 7£ LD fl,(HL) 

»« 2B DEC HL jBUfFERZElBER DEC. 

2f« 7^ LC (HLl,ft lUWI lElCHEN ABSPEICHERH 

^^ U r. ^" * ;BtJFFERZEI6ER IK. 

2f« 18 F3 JR 2Ffl3 jKEITER 

ZEICHEN EINFUE6EN 

2FB0F5 PUSH ftp jZEICHEN RETTEN 

2FB* 38 03 JR C,2FB9 ;Jfi 

El^ fi ., "'' '**' i«JN. ZEICHEN ZURUECK 

^M il " •"" 2F7D iNAECKSTES ZEICHEN 

i^" '^ SUB fi .flWfiHL DER ZUVERSCHIEBEKDEN ZEICt€H = LflENSE - CUORPOS 

i-. ""' '^ fLwNBE INC. 

2fSB 04 INC 6 ;CUflSORP0S IK. 

^.Vk 9. ''^'SH BC 6EIDE BETIEN 

2FBD EB EK DE.HL ;BUFFERZEIfiER NACH BE 

^K ^. ^ \i \.'L '^^^ ^^^ ZUVERSCHIEBETOEN ZEICHEN NMH HL 

irer ib W 1.0 H,IW 

?FC1 1? ADD HL.DE jflUF BOFFERZEISEfi ADDIEREN 

^" " .i-J B.« lERSIBT AMESSE D£S LETZTEN ZEICHEN (flOELLflDRESSE) 

J-Li *U LB C.L 

^rt ?n » .a J.f!i^. "L„ !* ' ER6IBT HELflDRESSE FUER VERSCHIEBUNS 

2FC5 CD H 19 CALL 1958 iVERSCHIEBUNG 

ffC8 CI POP BC iCORSMPOS UNO LflENGE NACH BC ZURUECK 

2F" Fl POP 6F jZEICWN ZURUECK 

™ll,, LD lHL),fl ilH BUFFER flISPEICHERN 

2FCE EB 2fl OJ CALL 032A jZEICHEN AltSGEBEN 

2FCE 23 INC HL iBUFFERZElBER INC. 

2FCF C3 7B 2F Jp 2F7D jNAECHSTES ZEICHEN 

BACKSPACE 

2FD2 76 LD fl,B ;CURSORP0S > 0? 

2FD3 B7 OR A 

™ a! T. ^ '*■"!. ''E"' BACKSPACE HOEGLICH, ZURUECK 

2FD5 05 DEC B jCUflSORPDS DEC. 

2FD6 2B DEC HL ;BUFFERZEIGER DEC. 

EE }l S! ., '-" ^"8 jBACKSPflCE AUS6EBEN 

2FD9 CD 2fl 03 CALL 032fl 

^l^iilr ^^ " ;ZAHL ML NIEDEftHOLT? 

2FBD20F3 JR NZ,2FD2 ;NEIN, KEITER 



ENTER 

2FE0 CD 75 2B CALL 2B75 {REST MR ZEJLE DRUCKEN 

SAVE CHANGES AND EIIT 

2FE3 CD FE 20 CALL 20FE ;CR AU56EBEN 

|F|^ E POP BC jRUECKSPROWADRESSE ENTFERNEH 

2FE7 Dl POP DE jZNR ZUfiUECK 

2FE8 7A LD A,D := FFFF' 

2FE9 A3 AND E ; (DIREKTHODE) 

2FEA 3C INC A 

2F£fl 2A A7 *0 LD HL,I40A7) il/O-BUFFERANFANG NACH HL 

f EE 2fl DEC HL fZEIGER EIN BYTE VOR BUFFER 

2F£F CB BET Z ■ Jfl, ZUfiUECK 

^^? ^,^ 3CF ;FL&6 SETZEN, DAHIT KINE DlftEKTflUSFUEHRUNS 

^l\ ^i 1%. ^ i REISER flUF JUFFERANFAN6 

2fF2 F5 PUSH AF jFLftS RETTEN 

2FFj C3 98 Ifl JP ]fl98 jSPRUNG IN HAUPTSCHLEIFE, NEOE ZEILE ABSPEICHERN 

CHANCEL AND ElfT 

2FFi CI POP BC jRUECKSPRUNGADRESSE ENTFERHEN 

2F" Dl POP DE ;ZNR ZURUECK 

2FFB C3 19 lA JP lfll9 ;ZUR HAUPTSCHLEIFE 



flUATSCH 
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2FFB HE C3 
2FFI a 44 12 



SBC 

3f 



C3 
B244 
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titiittttttdiittut 

I ANDERE VERSIONEN I 

tittunnttinttiu 



in FOieEWEK SIHD ALLE AEWERtMEN, DIE IN EINER NEUEKH VERSIOtI 6E6E)tUEFER DER HAUPTVERSION VffiBENDflnEN HURDEN, 

ZUSAMIENSESTELLT. DIE GEAEKDEfiTEN BTTES SIND DUfiCH EH '>' SEKEKNZEICHNET. 

mi m ALTEN VERSICMEH, DIE SEH REbD/UTft^EHLER HQCH MSEH, IST K&EHtlEnR HER HAUfTVERSlDN HQCH FOLBEHDE 

fSWEfnwe ZU BERUECKSICHTIBEN; 

22iA>3A>A9>40 LD A, I40A9} | CASSETTEKIMm? 



2260B7 
22iE>CB 



OH 
RET 



(JA, FERTI6) 



T ASTATlffiDECOD IEf)lAI8ST ABELLE : 

fi£I)MU.TET DIE ASCII-CODES CER DWTROL-TASTEN ID FDLGERDER REIHENFOLSE: 
ILMSHIFTED, SHIFTED) 
ENTER aEAtt BREAK W DOtM LEFT RI6HT SPACE 
OOSD 09 DD IF IF 01 01 SB IB OA>00 OB 18 09 19 20 30 i 



WFC 21 >« 01 LB HL,010E 



;ZEIBER AUF TEXT 'R/S L2 BASIC 



TEITE'. 
01» 4D 45 4D>20>53>49}»>45>00 KH SUE. 

010E>S2>2£>53>20>4C>32>20>42>41>53>49>4J>OD>00 R/S L2 BASIC, 



01 IOCS 

oiin>oi>oo>o5 

OI20>CP>W>00 

0]23>C1 

0124>OA 

0123>A3 

oiz6>ce 

0127>7A 
012S>07 

0129>07 
012A>C3>F1>03 



ENTPRELLUNe 
PUSH BC 



LD 

CALL 

POP 

LP 

m 

RET 

LB 

RICA 

RLCA 

JP 



BC,0300 

BC 
A, (BO 

1 
ft,D 



03FE 



iTASTATURADRESSE RETTEtl 
',19 HS MRUN 

;TASTATURADitESSE ZtffiUECK 

jTASTATURZEILE LAD£N 

;BLEICHE TASTE KOCH IWER BEORUECKT? 

INEIH, FERTIBS, A^O 

iUILEIMR. HftCH A 

1*4 

iZURUECK ZUR TASTATURROUTINE 



0248 06>i0 
024A 10 FE 
D24C CD IE 02 
024F Di>85 
0251 10 FE 



LD 

BJNZ 

CALL 

LD 

6JNZ 



B,60 
024A 
021E 
6,B5 
0251 



;703 US UftTEN 

;INPUTBIT ZlfRUECKSETIEN 
;994 US HARTEff 



03FA 5F 
03FB>C3>1C>01 

03FE 07 



LD E,A 

JP one 

RLCA 



;ZE1LEN1NF0 NACH E 

ISPRUME ZUR TASTATURENTPRELLUNG 



124B Fl 
1240D1 

t24D>B7 
124E C9 



POP 
POP 

w 

RET 



AF iVERSOilEWHfiEK ZUfHlECK 

DE ;DE ZURUECK 

A gVERSCHIEBUKN TESTEN 



20*7 JE 01 
2068 32 9C 40 
204C C3>7C 20 



LPRINT-AMMEISUMS 
AUSSABE AUF DRUCXER 
LD A, 01 

LD (4090, A 

JP 207C 



» PRlflT-ANHEISUMB 



204F CD CA 41 
2072 FE>23 
2074 20>06 
2076 CD>B4>02 
2079>32>VC>40 
207O2B 
207D>D7 
207E>CC>FE>20 



;ftUSSABE-FLA6 AUF DRUCKER SETZEN 
;UND IN PRINT SPR1H6EN 



AUS6ABE AUF BILDSCHIRH 
CALL 41CA 

23 

NZ,209B 

02S4 

(4090, A 

HL 

10 

Z,20FE 



CP 

JR 

CALL 

LD 

DEC 

RST 

CALL 



tCASSETTENAUSSABE? 
)ieiK, KITEfi 

[CASSETTENftECWDER EINSCHALTEN UND HEADER AUFZEICHNEH 

;AUS6ABE-FLA6 AUF CASSETTE 

i POINTER DEC. 

;NAECHSTES ZEICKEN, AHUEISUH6SENDE? 

;JA, CR AUSEEBEN 

SEITE 113 



20ei>CA>69>21 
2084>F6>20 
208A>FE>W 
2088>20>1B 



20SA>CB>01>2B 

208D>fE>M 

»9F>02>4A>1E 

2OT2>E5 

2093)21 >»>3C 

2096 >1 9 

2097>22>20>40 

209fl>7l 

2MS>Ei>3F 

209D>!2>M>40 

20A0>E1 

20fll>CF 

20A2>2C 

20fl3>18>C7 

20«>FE>BF 

20Aft>CA>BD>2C 

20Ri>FE>BC 

20AD>M>37>21 

20BOE5 

20I!>FE>2C 

20B3>2B>53 

20B>FE>3B 

2i)B7>28>5E 

20B9 CD 37 2J 

20BOE3 

20BDE7 



if Z,2169 [UHD FERTI6 

M M )SHIFT-BIT SETIEN 

CP bti ;= SHIFT KLAMERAFFE? 

Jfi MZ,20AS jHEIN 



AT AUSFUEWIEH 
CALL 2B01 



CP 
JP 
PUSH 

LD 

ADD 

LD 

LD 

AND 

LD 

PW 

RST 

JR 
CP 

JP 
CP 

JP 

PUSH 

CP 

JR 

CP 

JR 

CALL 

EI 

RST 



04 
IIC,1E4A 

HL 

HL,3C00 
HL.DE 
(4020), HL 

'/ 

(40A6),A 

HL 

08 

2om; 

BF 

Z,2CBD 

BC 

Z,2137 

HL 

2C 

Z,2I08 

31 

Z,2117 

2337 

(SP),HL 

20 



IPOSITGNSAUSDRUCK AUSIfERTEN, BANZZAHLIGEil KRT « 32768D) HACH DE, NS6 NACH A 

]POSITIW > 1023D? 

;JA, FC-ERKOft 

(POIKTER RETTEH 

iBILISCHiniASKSSE HACH HL 

;POSITI[»l ADDIEREN 

itM SUM ALS HEUE CURSORADRESSE APSPEICHERH 

;POSTIEM DES CWSORS IH DER ZEILE ERHITTELR 

iLSB ROD UD NACH A 

itfttD ALS HEUE CURSORPOSITW ABSPEICHERR 

{POINTER ZURUECK 

;SYNTAICHECK: POINTER Al^ ',' 



;HEITER 20AS 7E 

i= USIN6-TKEN? 

;JA, FOfmATIERTE AUS6A6E 

i= TAB-TOKEH? 

)Jft 

{POINTER RETTEN 

|JA 'ZUR NAECHSTER TAB-POSITION 

!= *;'? 

;JA, KITER, HAECHSTES ZEICHEN 
jAISORUCK A(f»tERTEN 
;ALT£N POINTER ZURUECX, HEUEH RETTEN 
;ER6EBKISTVP TESTEN 



LD 



A,(HL) iZElCHEN LADEH 



20F4 C3>7C 20 
."Sljfl E4 7F 



2ClF>Di>B2 

2C21>2a>02 

2C23>flF 

2C24>01>2F>23 

<2C25 J2F 

(2C26 >23 

2C27>F5 

2C2B>7£ 

2C29>B7 

2i:2A>2B>07 

2C2C>CD>37>23 

2C2F>CD>13>Zfl 

2C32>lfl 

2CJ3>iF 

2C34>F1 

2C3S>B7 

2C36>i7 

2C37>22>21>41 

2C3A>CC>4D>1B 

2C3D>21>00>00 

2C40>CD>93>02 

2C43 2A 21 41 



JP 
AND 



207C 
7F 



;KITER 

^nOD t2BD 



CLQAD-KFEHL 

PRDSRAMH VDN CASSETTE LADEN 



SUB 

JR 

lOR 

LD 

CPL 
INC 

PUSH 

LD 

OR 

JR 

CALL 

CALL 

LD 

LD 

POP 

OR 

LD 

LD 

CALL 

LD 

CALL 

LD 



B2 
Z,2C2S 

BC,232F 

HL 
AF 

A,(HL) 

A 

Z,2C33 

2337 

2A13 

A.tDE) 

'/ 

A 

H,A 

14121), W. 

Z,1B4D 

HL.OOOO 

0293 

HL,(4121) 



;='?'? INIRD IN PRJNT-TWEN UH8ENANDELT) 
iJA, aOAD? 
;VERIFY-FLA6 LOESCWN 

)VB1IFr-FLA8 SETZEN) 
{POINTER INC. I 
iVERlFY-FLftS RETTEN 
jZEICHEH LADEN 

{> zeilenende? 
{ja, kein filenahe 
iFiLenawnausdruci; AUSMERTEN 
|strin6adresse nach de 
{]. zeichen des filenahen nach l 

;«rify-fla6 zurueck 
;und nach h 

{filenamen und verify-fla6 abspeiciern 
jkein verify? --> neh 
{pointer auf ii3t nach ken &eldescht) 
{cassettenrecdrder ah, und syhc. suchen 

jVERIFY-FLAfi UND FILENANEH LADEN 



SEITE 114 



ttimttmtim 

t Mn-ADRESSEN t 

ttmttttmtiu 



ftESTART-VEKTHEtt 

4000 C3 % IC JP 1C96 )RST 09-VEKTW 

4003 C3 78 to JP 1D78 jRST 10-VEKTDR 

400i C3 90 IC JP tC90 )R3T 18-VEKTOR 

4O09 E3 M 25 JP 25D9 iRST M-VEKTM 

400C C9 RET ;RST 2B-VEKTm 

400D 00 HOP 

400E 00 MP 

400F C9 BET ;fiST 30-ra(T08 

♦010 00 «P 

4011 00 WP 

4012 Fl EI ;fiST 3B-VEKT0fi 

4013 C9 RET 

4014 00 HDP 





DCB'S 






KEYBOARD-DCB 




4015 01 




[DCB-TYP 


4016 E3 03 




;TRElBERAIffiESSE 


4016 00 00 00 




iUNBEHOTZT 


401B 4B 49 




KI 




BISPLAY-DC8 




401 S 07 




IKB-TYP 


401E se 04 




ITREIKRAMESSE 


4020 00 3C 




iCURSORAORESSE 


4022 00 




;ZEICHEH AUF CURSORPOS., KHK CURSOR OFF 


4023 44 4F 




M 




PRIHTER-DCB 




4025 U 




;DCI-Typ 


4026 8D 03 




gTREIBEUDRESSE 


4028 43 




IZEILEH/SEITE 


4029 00 




;ZEILEMZAeWiR 


402A00 




iUNKHUTZT 


402B 50 52 




PR 


402D C3 DO 50 


JP 5000 


;N. V. (UHTER DOS JP 4400, BOS-ENTRYl 


4030 C7 


RST 00 




4031 00 


HOP 




4032 00 


NOP 






MIRD VON CALL BEI FALSCHEN BIT IN DCB-TYP AN6ESPRUN8EH 


4033 3E 00 


LD A, 00 


;A = 


4035 C9 


RET 






TASTATUKTATUS 




4036 


FUER TASTATURZEILE 3B01 


4037 


■ ' 


3802 


4038 


■ ' 


3804 


4039 


" ' 


3B08 


403A 


" ■ 


3810 


403B 


■ ■ 


3B20 


403C 


■ • 


3840 




BOS-RAH 






IN LEVEL 2 BASIC FREI 


403E 


iVEIWeNHHtB NICKT lEKMHT 


4641 


;UHRZEITl SEKUNDEM 




4042 


i NIHUTEN 




4043 


; SnWDEH 




4044 


iHTimt TASE 




4045 


; HQNATE 




4046 


! JAHRE 




4MT 

4:? 


)VERtCHDUNB HIDfT BEKAHMT 



V UP FOEft DIVISION 

4O80 06 00 SUB 00 [SUBTRAKTIOHt 22 - Zl HACH Z2 

4082 iF LD L,A ;(L8B) 

4083 7C LD fljH 

4084 OE 00 SBC M 
4086 67 LD H,A 

SEITE lis 



4087 78 IB A,& 

4088 K 00 SK 06 
408A 47 LD B.A 

4081 IE 00 ID fl.OO jNSI 12 LMEB 

40SB C9 RET 

SYBTEtt-DATEN 
408E 4A IE jUSR-STARTAMESSE (=FC-ERRDR} 

4090 40 Ei 4D ))M.TIPLIKATDR FUEit MB 

UP FUEf) IMP 
4093 D8 00 IH A, 100) lEIMASEPORT WCH A LABEtt 

4095 C9 RET 



UP FUER OUT 
409i 03 00 OUT (00), A ;AKKU MJF PORT AUSSEIEN 

4098 E9 RET 



SYSTEH-MTEN 

4099 00 jIWCEYt-ZHISCHERSPEICHER 

409A 00 )LETZTER fEHLERCDK FUER ERR 

409B 00 lORUCKKDPFPOSITIDN 

409E 00 lAUSBABE^LAfi {0=DISPLAy, I=PHI)1TER, 80=CASSETTE1 

409B 40 ;IE1LEI1AEM6E AUF BILBSCHlfiH 

409E 30 jLETZTE TABPOSITIBN AUF BILOSCHIWt 

409F 00 ;N. V. 

40H K 43 ;ANFAII6 OER STRItieSPACE 

40A2 FE FF lAKTUELLE ZEILEHHUMCft 

40A4 E9 42 iPftOBRHMTEITANFAtlE 

40Ai {CURSORraSITIOM IH DER BILBSCHimZEILE 

40A7 E8 41 ;I/0-BUFFEIUHFAN6 

40A9 )FLA6 FUER INPUT. KMN CASSEHE, SOHST KEVBOARB ODER BATS 

40AA jLETZTE ZUFALLSZiWL (FESTKMflA 24-BIT) 

40AD ,H. V. 

40AE ;BIH-FLA6 (0 KEIN DIN, SOKST OIK) 

WW (TYPl! TYPCOBE DES IDHALTES BES I-RE6ISTERS 

40B0 ;FLA6 FUER ZHISCHEKOBEERZEUeUHB (HACH HTA 4E, SOHST 0) 

;DPERATORCfflE SEl AUSFUEHRUN6 DER SRUWRECHEHMTEN 

40B1 {LETZTER SPEICHERPLAT7 BER FIER BASIC ZUR VERFUE8UHG 5TEHT 

ZHtSCHEHSPEICHER FUER STRIH6S 
40B3 ;ABRESSE DES MECHSTEH FREIEH ZWSCHEXSPEICHERPLATZES 

40B5 ;11 ZII9CHEWPEICHERPLAETZE FUER STRIHGS 

laAENBE, AMKSSE <RSB. L5B)) 

Si!? '.^£!SJiS?.?)i!F*'™*^^'^' ^^ """« ™ "HTRAB IN BEH ZHISCHENSPEICHER 

l^^i '5U"'*SF^E'"''l "JBT AUF lETZTES FREIE BYTE MR STRIH6SPACE 

40B8 ;OPERATDRPDIHTER Ih AUSBRUCKSAU9HERTUNG 

iARRAYTABZEIBER IH FELDVERflRBEITUW UNS BEIfl PAOtEH DER STRlHGSPflCE 
4DBA ;BATAZEILENNUmER 

1«5n ''l\^. ^1?,^^^ ■*" FELBVftRIflBLEN ILAUFVARIflBLEH (1)1, FELMR FREIBESEBEN 

ILETZTES ZEICt€H IK USIN6 
4W {POINTER IH HEIT 

jSYSTEB-FILE-ENTRYPOIHT 

(VARTABADRESSE IN LET 
40EI jflUT0-FLA6, VENN KEIH flUTO 

40E2 ;AUTO-ZEILm}NICR 

40E4 jflUTO-HCREflEHT 

l?c'o 'yi'£kk!£,.?'l??"Lil'^'' ** ««ISUW DIE BERABE VERARBEITET HIRD 

40E8 ;AflFAN65HERT DES 'NORftALEH' RUECKSPRUN6ADRESSEN STACK 

40Efl iFEHLER-ZEUiWWHHERi lEILE IH DER DER LETITE FEHLER ftUFTRAT 

;OEC ['.'-IEILENIIUHHER: ZEILEHHUHKR FUER '.'-OPTIW 

I M^i""-"-*^^ SIlNlffiT^SR^sirN . 

IM7 'SSSl'SSPJI"rUl"«^l'"'SR^™"" ^"l-E "• ^^ LETZTE PR06fiAHHUNTEflBRECHUH6 STflTTFAHD 

iffiSSi^ilfEl^ff sE^i'^^r-u^^"^""^ ""' ^""^ ™ ™^' °''' ^ 

40F9 •WTiUg^Kr'^mIabShTMELLE* **"™T^" "■*" FMTFUEHRUN6 DER AUSFUEHRUHG UNH0E6LICH 

40FB \tmm DER ARRAYTA8EUE 

1^1 'f!fTttl,!M ^Wi BKICHERS (EIH BYTE HACH ARRflYTABELLEHEHDE) 

*WF iDATAZEIBERi ZEI6T AUF TRENKZEICHEH HACH DEN ZULETZT 6ELESENEH DATEH 

TYPCODETABELLE 
^'" 'u"JSyil,^RlSUH"^'^'"-GE FUER JEDEH BUCHSTABEH EIHEN TYPCODE, DER DEN TYP EINER 

jVflfilABLEN HIT DEfl EHTSPRECHEHDEN BUGHSTABEN ALS EfiSTEH ZEICHEH DES VARIABl^HNANEN 

SEITE Hi 



. , jflWIBT, HEHH DER VflfilABLEMttHE «IN£ EiaiZITE lYPfllftflBE BEINHALIET. 

4nB ;TfiACE-FlA6, = TROFF, AF=TfiON 

REBISTER FUER ARITHKTHIK 
411C ;!USAETZLICHES NIEKRWRTIBSTES BYTE FUER RECKTSSCHIEBEH (Nlflt BEI DOUBLE) 



41 ID 

411E 
411F 
4120 
4121 
4122 
4123 
4124 



I -REGISTER 




iZtfR ABSPEICHERtMG VOM UERTEN ALLER 4 TYPEN. HIE FOLGTi 


ilNTEBER STRIH6 SIH6LE 


DOUBLE 




LSB 




LSB 




LSB 




LSB 


LSB LSB LSB 


LSB 


HSB HSB LSB 


LSB 


HSB 


flSB 


EKP 


EIP 



ilKI STRIWS HIRD NUR DER STRINGZEI6ER (AUF VARTftB ODER ZHISCHENSPEICHER) ABBESPEICHERTI 



Y-REGISTER 






IHTEBER STRIHS 


SIHH.E 


DOUBLE 


LSB LSB 


LSB 


LSB 


MSB RSB 


LSB 


LSB 




nsB 


LSB 




EIP 


LSB 

LSB 

m 



412S iZHISCHENSPEICHER FUER ARITHKTIK, Z.B. FUER SI6H-FLA6 

4124 jZUSAETILICHES HIEDERHERTISSTES IVTE FUER RECHTSSCHIEBEN (MUR FUEfi DOUBLE! 

4127 
4128 
4129 
412A 
4126 
412C 
41 2D 
412E 

AUSSABEBtTFER FUER ZAHLENAUSGABE 

412F fZUSAETZLICHES BYTE FUER 'I' BEI FELDUEBERLAUF 

4110 ;NORHALER ANFAHB 

414A ZUSAET2LICHES REBISTER FUER DOUBLE PRECISIM HULTIPLIKATIOtt UNO DIVISIM 

IEI6ER m ERMEITERUNB DES LEVEL-2-BflSICS DORCH DAS DISK-BASIC 

4152 'J|',^^f!'S!!i!.?i?''"^*5"^ AKtlEISUWEN UND FUNKTIONEH (MERDEN BEI LEVEL-2-IKITIALISIERUII6 BWCH 

fJP L3-ERRffit ERSETIT) 

4152 jCVI-FUWfTIQH 

4155 ;FN-FUtfltTIWI 

41 SB ;CVS-FUNKTIDN 

415B iDEF-AIWEISlWe 

415E sCVD-FUNKTIOM 

4141 iEDF-FUNKTION 

4144 ;LOC-FUM:TIDfl 

4167 ILOF-FIMTIOK 

414A ;fKII-FUNKTIDN 

414D iKS»-FWH£TION 

4170 ;(UDt-FUNKTIOH 

4173 jCm-ANKISUMG 

4176 ;TIHEt-FUNKTIOII 

4179 lOPED-AMiEISUHB 

417C ;FIELD-AMtEISUH6 

417F iSET-ANHEISUttB 

41 S2 ;PUT-AIMEISUH6 

41BS iCLDSE-ANKISUIfi 

41 SB ; LOAD-AWE 1 5UN6 

41BB {KRSE-AIWEIS1M6 

418E ;NAHE-ANHISUM 

41?1 ]KILL-AWEISUNS 

4194 il-RMTKOK 

4197 iLSET-ANUEISUNB 

419A ;RSET-A1WEISUW 

419D ilNSTR-FUNKTIOII 

41A0 ;SAVE-MKISUM 

41A3 jLINE-ANUEISUM 

*'" '^.^ulS^^.^tfi.^H"^""* "OW^MKNER BEFEHLE DURCH DAS DISK-BflSIC (tIERDEN BEI DER LEVEL-2- 
;INITIALISIEfilM DIffiCH RET ERSETZT) 

Mt^f?L^i"=?".,K^i'! P^J.I" *^ ^^^ LEVEL-2-BAS1C, UHTER DISK-BASIC flEMERN SIE SICH (!1. 
il^J^\£^^JIt^ ^^*"-^ "'^ *™53" "" ^E'^" ANGbEBEN, DORT KDENNEN DIE flORESSEN IMR 



I/O-Bl^FER 
41E5 3A 00 2C \':',fi,',' VOR I/0-BUFFER 



UITE 117 



U1A7J 
42S8 



42Eaoo 

42E9 
(40H) 



1MF9) 



IWB) 



MOfD) 



(40£3) 



f40iW)-2 M M 



140M)M 

(4DD61 

(40B)) 



;[TREIMZEICHEK FUEfi EINCABEN fiZH. AHNEISUN6EM) 

;FUER TASTflTUREUffiftBEN, ZHISCHEHCflDEERIEUeUKS UHD TEIITERIEUHJM FUER LISTIIBS 
jflNFAMSKERT KS STACKS IH 8YSTEH-BEFEHL 

meunHTEiT 

jKULLSYTE VOR PRQ6RftmTEXT miCMTlSUlJ 

;PR06RAHnTEIT: 

;KSTEHEND AtfS N ZEILEN) 

iJii'-ISi^li'-??"'^"^'^^'-^'''*"'"'^'' 'LSB/IBD/TEU IH «ISCHENCOD£/0 FUER ZEILENEMDE 
;IMI EINEH OOOO-ZEILENZEIBEfi ZUR MRKIERUK PES PRDfiMWEIIKS 

VARIABLENTAKLLE 

iBESTEKDIfi AUS N VARIABLEN WD KREH WRTEN: 
( TyPCODE/2, WKHSTABEy 1 , MKHSTABE/tfERT 
)KR VARIAeLEWERT 1ST FD16ENIERHASSEH ABGESPEICHERT; 
flNTESER STRIM SlIt&lE DOUBLE 
iLSfi LAEM6E LSB LSB 
{HSe L56(AD»)LSB LSB 
nSBiADR)NSB LSB 
EXP LSB 
LSB 

AftftAYTABELLE 

IBESTEIKHI) AUS H ARftAYS fllT FOLGENDEH AUFBAUi 

jTyP/2.BlffiHSrftBE/l.BlOSTA8E/A»IZAHL AUER F0L6EWEJI BYTES (LSB/IIS8)/ 

[AHZAHL DEfi BIPIEWIOKH/TIEFE JEDER DlflEKSIM (LSByHSB, (WKFftllSEtl HIT MR LETZTEHi /IIERTE 

[^ flORESSE EIMES BESTIfWTEB MERTES EIKES AflfiflYS EREctWET SICH tllE Fa«i """"'"^ 

;0 = IZ t TY * lY I n t II I TH t III t TV t IV 

;1IDBei I. IWEI UNO T. TIEFE DER JENElLIfiEN DIHENSIDII BEKUTET. DER SICH ER6EBENK OFFSET 

'■i?L.£U^iL^- "tiySIF "^S ^"-EHEMTES fl«,0.0,0,0) ADDIERT UNO nAN ERHAELT DIE flORESSE KS 

jDIE EIHZELHCH HEBTE SIND BENAUSO HIE IN KR VARIftSLENTABELLE AB8ESPEICHERT. 

FREIER SPEICHER 

KR FOLSENK SPEICHERRAUH 1ST BIS ZWt STACK FPEI 

STACK 

i'NDRHALER' STACK FUER RUECKSPRIMSADRESSEN UND DATEH 

iSTKK FUER PROBfiAnHDATEK 

ilN JIESEH STACK MERDEN DIE PAfiAHETER VDN GOSUB'S UNO FOfi-NEKT-SCHLEIFEII ABSESPEICHERT 

■KEWIIM6 91 (> 60SUB-T0KEN) 
jZNR OER AUFRUFENOEN ZEILE ILSB/NSB) 
;PaiNTEIt AUF ANHEINSUH6 DIE 60SUB FDL6T llSB/tlSI) 
fFOR-NEKT-SCHLEIFE; 
5IHTE6ER SIHBLt 

J KENNUNS 81 (> FOR-TDKEM) 

; LAUFVARIARENADRESSE IN VARTAB (LSB/HSB) 

i INC-FLA6, 1 KKN INCR. >0, FF MENN INCR. ( UNO HENN INCH. > 

) TYP-FLA6, FF FUER INTESEB UND 1 FUER SINSLE 

I " IHCBEiettt LSB 

f " LSB 

i -- MSB 

! - Uf 

lINCREHENT LSB EWNCRT LSB 

I RS& L» 

lEWKRT LSB m 

MB Elf 

; ZEILENNUmER DEP FDR-AMEISUNS (LSB/HSB) 

I ZEIGER AUF ANHEISUNS HACN F0R-ANIIEI5Utl6 (LSB/HSB) 

iEliWtMICIERU« FUER STACK 

STRIN6SPACE 

ANFANe DER STRINGSPACE 

LETZTES FREIE BYTE DER STfllN6SPACE 

LETZTES BYTE (AS VW BASIC BCLE6T HERDEH KMX 



5E1TE UB 



tiitMrnnttttt 

I I/a-AORESSEK 1 
tdttttttttlttti 



37EC 



!7£D 



37EF 



I/D-WRTS 
FT iUHIVEItSELLER E1N-/MJS6ABEPDRT F1£R SYSTEMNKEHDUHeEN 

lEIWABEi 

:BIT b : DlSPLAVnODE 164 CPL/32 CPL (1/0)) 

;BI7 7 : CASSETTEN INPUT: HIRD SURCH SPANNUN6 AH EAR-STECXER SESETIT IM DURCH SCHfSlKK KG PNT'. 
; FF HIEKR ZUAUECK BESET ZT 

:AUS6ABEi 

iBIT 0,1; STEUERH SPAHNtlMG AH AUI-STECKER 
; OOUHD 11: 0.45 V 

; 01 : 0.86 V 

; 10 I V 

iBIT 2 i STEUERT CASSETTEKRECDRDEAlHtTOR (LAEUFT MENN BIT SESETZT) 
fBIT 3 : STEUERT DISPLATBODE (M CPL/32 CPL 10/1) 

BEWHY-HAPI'ED-I/O 

;(A1.LE FOLGEHDEN AHES5EH DIE HIT 37,. BEeiHMEH SINS NUR HIT EIPAHSIDH VERFUEGBAR.) 
37DE (CDHHUNI CATION STATUS ADDRESS 

37DF jCOflHlMlCATIQN DATA ADDRESS 

37E0-37E3 ;EIN6ABEi 

jINTERRUPTSTATUSi 

;BIT 6i FDC-HTERRWT 

;BIT 7: UKERLAUBTER INTERRUPT 

;AUSGABE: 

;DfiIVESELECT UND HOTOR AN 

;BIT 0: DS 

jBIT l! DS 1 

;BIT 2; DS 2 

;BIT 3i DS 3 
37E4-37E7 jAUSSABE: 

;CASSETTEHRECORDERAHItAl«. 

;6IT 0: CASSTTE 1 (0) ODER 2 lit 

ffllNTEfi-PQRT! 
37ES-37EB ; <5TANDART CENTROHn-PARALLEL-SCMIITTSTELLE) 

;EIHeABE: 
jBIT 4! FAULT 
|BIT 5: WIT SELECT 
;BIT b: OUT PAPER 
)6IT 7i BUSY 
jAUSBABEi 
;ZU DRUCKENDES ZEICHEN 



FDC-ADRESSEN 

;EIN6ABEi 

i STATUS 

jAUSSABEt 

]CHD 

iAUSBABEi 

; TRACK 



37EE iAUSSABEi 

; SECTOR 



;£IH-/AUS6ABEi 
IDATEN 



TASTATORABRESSEN 

; BIT 7 6 5 4 3 2 1 

3B01 ; 6 F E D C B A KL.AFFE 

3802 ; D N N L K J I H 

3B04 ; H V U T S R B P 

3808 J Z Y 1 

3810 ; 7 6 5 4 3 2 10 

3820 ; / t - , I ! 9 8 

3B40 ] SPACE RIGHT LEFT DOHN UP BREAK CLEAR ENTER 

3880 ; SHIFT 

ilEI DIE3EN ADRESSEN HIRD GEMAU EIHE TASTATURZEILE AB6EFRAGT, 1ST EINE TASTE GEDRUECKT, 1ST MS 

[ENTSPRECHENDE BIT 6ESETZT. 

3e7F IABFRA6E ALLER TASTEN (AUSSEA SHIFT), NUR HEHH KEIN TASTE GEDRl^CKT 1ST, ERGIIT EINE AIFRME 0. 
JSFF jDERfiL. NIT SHIFT 

VIDED-RAH 
3C00 ;1024D BYTE VIDEO-RAN lOHHE BIT b, DAHER KEINE KLEINBUCHSTABEN (!)) 
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mmmtiiittttt 

t UHTERraoeuNie t 
itMiittmmmt 



OOOB HEIIE 
002B IKH 
0D33 DUTCH 
0031 PRINT 
004f ]KW 
OOWBELAV 
01C9 CLS 
01D9 Ptfl.SE 
01 FS CASOFF 
OlFE CASK 
021 S CASON 
021E RESINP 
0221 PDRTCT 
02»: ILIHK 
023S REAOB 
0241 READII 
0261 WBTH 
02&4 UfilTEB 
0264 INITU 
02B7 MITES 
02?3 miTR 
Om READS 
0314 REAM 
032AiJUTCHF 
03U DU7D)2 
034B CURfDS 
035S 1IICH2 
0361 IM.IH£ 
03B4 IMCWZ 
038)RES?R 
0394 PRCR 
039C PRIMTI 
03C2 CALL 
05II1 PfffiOY 
65H lltftffF 
0708 SAM2 
070BSUK 
0710 5SU8C 
0713 9SUIT 
07 U SAHY 
0778 RNULL 
07B7 5MD0Y 
07D7 SRYR 
0809 LOG 
0841 MLTLl 
0B47 SHLTY 
0897 SDIVIO 
0SA2 SDIUY 
093E SHLTtO 
0955 RTESTI 
0944 FLOATA 
0977 ABS 
097B NEB 
0982 RHE6 
098A S6M 
098D IBTA 
0994 TESTI 
0991 I TESTI 
09A4 SPUSHI 

0911 SLDIYC 
0914 SLMY 
09BF SLBYI 
09C2 SLDYC 
09CBSLKI 

0912 mVE 
09B3fWVEl 
09F4 LDIY 
09FC LBYX 
0A03 POIRTX 
OAOC 5CPIY 
OA39 ICP 



HACH AOfiESSEtl SORTIERT 
ERUITTELT STAW KS PC 
TASTATUtASFRAGE 

AUS6ABE EIHCS ZEICHEHS AUF DEN BILBSCHIM 
AUS&AK EIHES lElCHENS ftUF QEN MUCKER 
TASTATURABFRAK IHARTET BIS EIRE HEUE TASTE 6EDRUECKT tllU) 
ZEITSCHLEIFE 

BIISSCHIRD MIRD BELDESCHT 
8I8T IMtPULS AUF KASSETTE AUS 
CASSETENRECffitDER UIS3CHALTEN 

DECODIEfiT CflSSETTENRECWMH*. UM) SCKALTET CASSETTEHRECORDER EIH 
SCHALTET CASSETTEWECORDER EIN 
SETIT DEN EISfllEPBRT BIT 7 VON PORT 255D ZURaEU 
STEUERT PORT 255D 

SCHALTET STERN IN BILOSCHlRtCCKE UH 
LIEST BYTE VON CASSETTE 
LIEST BIT VON CASSETTE 
SCHREIBT BYTE ZNEIML AUF CASSETTE 
SCHREIBT BYTE AUF CASSETTE 

CASSETTENRECORHR AH UH6 SYWHRONBYTES AUFZEICNEH 
SCHREIBT SYNCHROWYTES (2S5D I UND A5) 
CASSETTENRECDRDER AH UND SYHCHRONBYTES LE5EN 
LIEST SYHCHRONISATIEW 
LIEST WRT (LSB, RSB) VON CASSETTE 
6IBT ZEICWN ta BILDSCHIRN, PRINTER ODER CASSETTE AUS 
Bir ZEICNEK AUF DEH BILOSCHIRH AUS 
ERRITTELT CURSORPDSITIM IN DEfl ZEILE 
SIEHE IHCH 

LIEST ZEILE VON TASTflTUH IN I/0-BUFFER 
SIEHE INCHH 

?S^'l^cP«Il?^".'' ""^ ^^ ^^ "•"""' 'K* DRUCKKDPF NICKT IN POSITION 

ZEICHEN AUF DRUCKER AUSSEBEN 

RUFT I/0-ROUTIHBI UEIER DCI AUF 

TESTET 08 DRUCKER BEREIT 

ElNMfiE EIHER ZEILE IN DEN BUFFER 

SIN6LE ADDITION: Z ^^ Zl + 0.3 

SIM6LEA9IITI0H) Z = C t Zl 

SIN6LESUITRAJCTI0N: Z ■ C - Zl 

SINGLESUGTRAKTION: Z > Z2 - Zl 

Sim.EA&DniM: 1 - 12 t II 

REELLE ZAHL ■ 

SINGLENANTISSENAODITION 

SCHIEBT SIHftiZAHL UH A BITS RECHT9 

BERECHKT HATUEALICHEH LDGARITHHUS 

SIWLEmniPLIKATlON niT LM 12) 

SIHSLEftULTIPLIKATIONi Z > Zl t Z2 

SINGLEDIVISDN MRCH lOD 

S I N&LEDI VISIONS Z = Z2 / Zl 

SIKaENULTIPLIKATION NIT lOD 

TESTET REELLE IfWL 

e-BlT-ZAHL HIT SIGN IBIT7) IH SINGLE UHKANDELI 

ABSaUT mi EINER ZAHL BILDEN 

NE6ATIVEN KRT EINER ZAHL BILDEN 

NE6ATIVEH UERT EINER REELLEN ZAHL BILDEN 

BILDET DIE SStl-FUHKTlON EINER IftHL 

HNDELT A IH 16-BIT- IHTE6ER UN (HIT SISH) 

TESTET M.LE HUNERISCHEN TYPEH 

TESTET IHTE6ERZAHL 

FSTTET SINGLE AUF STACK 

LAEDT SIWU-KONSTMTE 

TRAHSPDRTIERT SINGLE ZAHL 

TRANSPORTIERT SINGLE ZAHL 

LAEDT KDKSTANTE 

SPEICHERT ZAHL ALS KDHSTANTE 

TRANSPORTIERT NERT JEDEN TYP 

NIE HOVE KI VERTAUSCHTEN ZEI&ERN 

SPEICHERT KRT UK 

SPEICHERT NERT UH 

ERHITTELT I-ASRESSE IN ABNAENBIKEIT VON TVPI 

S INGLE VERGLEICHi Zl UHS 12 

IHTEGERVEfifiLEICH: Zl UND Z2 
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0fl49 DCPKC 
M4F DCPKY 
0fl7a DCPyi 
Ofl7F CINT 
0A9A ILDIHL 
M9D TYP>1 

mi csmi 

OACC ICSWI 
OflCF Kmn 
we cofiLi 

OAEC TYPID 
OftEF TYPKS 
0B3i FII 
0837 IKT 
OSAA IKSEl 
06C7 ISUS 
0BD2 I ADD 
0BF2 IHLT 
0CS6 IN£6 
K70 DSUB 
0C77 DADO 
0D33 DNADB 
004S DflSUB 
OD&A RLHA 
OD?0 RUt 
0D97 RLH 
ODAl ORLT 
ODBC DDIVIO 
ODES DDIV 
0E4D CKTIO 
OEiS DVAL 
mC LVAL 
OEFB CAEAL 
OrOA IttLTlO 
0F18 RSIVID 
0FB9 SADBA 
0FA7 PRZHfil 
OFAF PR7Hfi 
OFBD USTfi 
OFBE FSTfi 
WW FILLO 
13E7 SSR 
13F2 POWR 
1439 EIP 

149A mm 

14A9 REIHE2 
14C9 RHD 
14F0 RRMD 
IHl CDS 
1547 SIH 

15BS ATN 
lAFS LPHT 
IftfC LPNTP 
IB 10 LARB 
1B2C SLIHE 
1BB3 INLIW 
!K0 EKTIT 
1C90 CPHLDE 
1C96 CHECK 
1D7B CHftCET 
1E3D LETTER 
1E45 IHTEKP 
1E4F DECLM 
1F05 BEDS 
1F07 SEOL 
20F9 BEITL 
20FECR 
233S EIPB 
2337 EIP 
2490 ID IV 
249F WERMD 
25D9 TYPCHK 
260D SVAR 
27F8 ILDIA 
2B19 CITYPft 
2857 STEHPS 
2B65 STRC 
2aA& PRINTS 



DQUBLEVERH.EICH 21 IM K(MSTANTE 

OOUBLEVERBLEICH: Zl IMD 12 

DOUBLEUERSLEICH: Zl tm Z2 

HANDELT ZAU IN U-BIT INTESR UN 

LAEDT ZAHL ALS INTEGER HACK !t 

TVPK = INTESEfi 

MKDELT ZAHL IN SIHSLE IM 

INTEGER IN SIM6LE UHHANDELN 

IHTE6ER IN SINGLE ItHMNOELN 

IfM. IH DOUBU UWMDELN 

TYPI ' DOUBLE 

TYPI = SINGLE 

INT OHHE BEMECK8ICHT1GUNG DES VQRZEICHENS 

ERHITTELTE NAECH8T KLEIIOE GANZE ZAHL 

HULTIPLIMTIM IFUER FELDVEBtttLTUNG) 

INTEGEflSUSTRAKTIOH: Z = Zl - Z3 

INTEGERADDITIONi Z = Zl > 22 

INTEGERNULTIPLIHTIOHi 2 = 21 t 22 

NE6ATIVEN HERT EINER INTEBERZAHL 

DQUBLESUflTRIKTIOHi Z <= 21 - 22 

DOUBLEADOUKM) Z = Zl t 22 

DOUBLEMNTISSEHUDITIEM 

DQUBLEHANTISSENSUSTRAKT IDN 

S SPEICHER2EUEN RECHTS SCHIEBEN 

SPEICHERBEREICH UH 1 BIT RECHTS SCHIEBEN 

SPEICHERBEREICK UN E IN BIT LI IKS SCHIEBEN 

DOUHjnULTin.IKATIWi 2 = 21 I Z2 

DDUBLEBIUIDISIDN DURCH lOD 

DOUBLED I VISION] Z = Zl / Z2 

DOUBLEWLTIPLIKATIDN HIT lOS 

HAHDELT STRING IN ZAHL (NHIBLEl UH 

HANDELT STRING IN ZAH. PASSENDEN TYPS UN 

MHDELT ZAHL IN SIN6LE ODER DOUBLE Ufl 

NULTIPLIZIERT REELLE ZAHL HIT lOD 

BIVIDIEitT REELLE ZAHL BURCH lOD 

SUfK BILDEN 

' IN ' 2EILENNURHER AUSGEBEH 

ZEILENMMNER AttSGEBEN 

HANDELT ZAHL IN UHFDRtMTIERTEN STRING UN 

HANDELT ZAHL IN FQAHATIERTEN STRINS UH 

NULLED IN BUFFER EINSCHREIBEN 

BILDET DIE HUR2EL EINER ZAHL 

DERECHMT DIE PDTENZ EINER ZAHL 

EUPMEHTIALFUNKTIQH EINER ZAHL BESTIHHEN 

BERECHHET REIHE > CI t 2 + C2 t Ztt3 * C3 t 2ttS 

BERECHNET REIHE = CI ♦ C2 t I ♦ C3 t 2112 + C4 t lUJ" 

ERZEU6UNG EIHER Zl^ALiSZAHL 

REELLE ZUFALLSZAHL ERZEU8EH 

COSINttS-FUNKTION BERECHHEN 

SINUS-FUNKTION BERECHKN 

TAItGEHS-FUWCTlM BEKCHKN ■ 

ARCUSTANGENS-FUWTim BERECHNEN 

2EILENZEI&ER IN GANZEN PROGRMfflTEn ERNEUERH 

ZEILENZEIBER TEtLHEISE ERNEUERH 

AHALYSIERT 2HEI ARGUNEHTE FUER LIST 

SUCHT lEILE IH PftOGRAWITEKT 

BI6T '? ' AUG [IHO ERNAC^TET E1N6ABE EINER ZEILE 

ERZEUGT ZHISCHEHCQDE 

RST IB'UP: VER6LE1CHT HL UHD BE 

RST OB'UP: SYNTAICHECK 

fsTEOB^EIcMrMHSTAK "''"*^" "'"^^ ^^ "*^ INfORNfiTlOHEH ISBER ES 

AllSDRUCK AUSHERTEH UHD GAN22Wfl.IGEH HERT « S276BD) ERHITTELH 

STRING IH im. UNHAHDELN (6AN2E ZAHL < »530D) 

SttCHT ENDE DER MMEISUNG 

SUCHT ZEILENENOE 

CR AUSGEBEH, HEHH CUROSR HICHT IN PDSTION 

Cft AUSGEBEH 

AUSDRUCK AUSKERTEN DER HIT CLAHHER BE6INNT 

AUSDRUCK AUSKERTEN 

IHTEGERD I VISION 

DPERAHBEN FUER AUSDRttCKSAHALYSE AUSHERTEH 

fiST 20-UP: TESTET TYP DES K-RESISTER IHHALTS 

VARIABLE IH TABEUE SUCHEN UND EIHfilCBTEH, NENN HICHT VDfiHANDEH 

ZAHL ALS IHTEGER (DHNE SIGN) HACK I ' 

HERT IH GEWfEHSCHTEH TYP UflMNDELN 

ERHITTELT STRINGSPACEADRESSE UND LEST SIE IH VORL. ZNISEHEHSPEICHEI! AB 

STfilNGKONSTAHTE IN ZHISCHEHSPEICHEft UHD I UEBEftNEHHEN 

DRUCKT EIHEN STRING 
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2SBF HRODfl PLATZ FI£R STRIW IN STftlNBSPACE NACKEN 

2B01 INTEIP AUSDRUCK AUSMERTEN UND ER6EBNIS IN IHTE6ER UfNAMDELN 

281B lEXPA AUSDRUCK AUSKRTEH, Efi&EWIS IN INTEfiEfi mWAHOEU « 2SU] 

2B75 PRIHTT DfilfiKT TEHSTniMG 

2B7E GENTKT ERZEU6T AUS ZHISCHENCDSES LESBAREN TEIT 



ALPHABETISCH SORTIERT 

0977 ABS ABSOLUT WRT EIMER ZAHL BILDEN 

ISBD ATN AftCLfSTAWBIS-FlMTIM leRECHffiH 

022E: aim schaltet stern in BiLoscHiRcaE un 

0;SC2 CAU ftUFT I/D-RDUTINEN UEBCR KB AUF 

OlFE CASW DECODIERT CASSETTENRECMKMR. UHD SCHALTET CASSETTENRECORDES EIN 

01F8 CA50FF CAS^TENRECQMER AUSSCHALTEN 

0215 CASM SCHALTET CASSETTENRECCtRDER EIN 

DADB CDBIK ZAW. IN DOUBLE WMANKLH 

1C96 CHECK RST OS-UP: SYHTAXCKECK 

lD7a CHRBET RST lO-UPi SUCHT NAECHSTES SIENIFIKANTES ZEICHEN UND 6JBT INFORHATIONEN l£BER ES 

0A7F CINT HANDELT ZAHl IN 16-&IT IHTE5ER UK 

OIC? CLS BIIOSCHIRH NIRB 6ELDESCHT 

1541 CQS COSIMIS-FUNKTIOH BERECHHEN 

1C90 CPHLK RST 18-UP! VERSLEICHT HL UHD D£ 

20FE CR CR AUS6EKN 

OEFB CREAL MHDELT ZAHL ID SIN6LE ODER DOUBLE UH 

OAll CSNGI HAKDELT ZAHL IN SIH6LE UH 

0348 CUdPOS ERHITTELT CURSORPOSITIW IN DER ZEILE 

2fll9 CITrPA KRT IN SEWJENSCHTEN TYP UMANDELN 

0C77 DADD HUBLEnDSITIWi Z > U * 12 

0A49 DCPKC OQUBLEVERBIEICH Z] tWD KQNSTAHTE 

0A4F DCPIY DOUBLE VERELEICHi Zl UND Z2 

0A78 DCPYI DOUBLEVERfiLEICH: Zl UNB Z2 

ODES DDIV DDUBLEDIVISIHi Z = Zl / Z2 

ODSC DDIVIO DDUBLEDIVIDISIDN DURCH lOD 

1E4F DECLHO 5TRINS IN ZAHL UIMAHDELN (SANZE ZAHL < &S530D) 

OOW DELAY ZEITSCHLEIFE 

0D33 DflADD DDUBLENAHTISSENADDITION 

ODfll DHLT DOUBLEIWLTIPLIKATIDNi Z = Zl I Z2 

0E4D DNLTIO DOUDLEflULTIPLIKATIDH NIT lOD 

ODtS DHSUB DOUBLEHANTISSEHBUBTRAKTIOH 

0C70 DSUS DOUBLESUBTRAKTION; Z = Zl - Z2 

CC&S DVAL HANDELT STRIN6 IN ZAHL (DOUBLE) UN 

IBCO ENCTXT ERZEU6T ZHISCHENCCDE 

2337 EIP AUSDRUCK AUSHERTEN 

1439 EIP EIPONENTIALFUKTIW FINER ZAHL BESTItMEN 

233S EIPB AUSDRUCK AUSHERTEN KR KIT KLARHER BE6INHT 

1269 FILLO NULLEN IN BUFFER EIHSCHREIBEN 

mb FII INT HME BERUECKSICHTISUW DES VORZEICHEHS 

0964 FLOATA 8-BlT-ZAHL NIT SIGN (BIT7> IN 5IN6LE UHNAHOELN 

DFBE FSTR HMDELT ZAHL IN FDRUTIERTEN STRING UH 

2B7E GENTIT ERZEUGT AUS ZNISCHEHC0DE5 LESBAREN TEIT 

0008 HERE ERHITTELT STAND DES PC 

(IBD2 lADD INTE&ERADDITION: Z = Zl t Z2 

OA39 ICP INTEGER VERGLE I CH: Zl UND Z2 

OACF ICSIffiH INTEGER IN SINGLE UNUHDELN 

MCC ICSNeH INTEGER IN SIII6LE UHHANDELH 

2490 IDIV INTE6ERDIV1SI0N 

2B1B lEIPA AUSDRUCK AUSVERTEH, ER6EBNIS IN INTEGER UIWANKLN « 2UD) 

27F8 ILDIA ZAHL M.S INTEGER (WNE SIONI HACH X 

0A9A ILBIHL LAEDT ZAHL ALS INTEGER NACH K 

0flF2 IHLT INTEGEfltmLTIPLIHTIOM! Z = Zl I Z2 

05D9 INBUFF EIH6ABE FINER ZEILE IN DEN BUFFER 

0026 INCH TASTATURA8FRA6E 

0359 INCH2 SIEHE INCH 

0049 INCHN TASTATURABFRAGE (HARTET BIS FINE HEUE TASTE GEDRUECKT NIRD) 

0334 INCHH2 SIEKE IWHH 

OBAA INDEl NI^TIPLIKATION (FUER FELDVERHALTUN8I 

0C5B INE8 NE6ATIVEN HERT EINER INTE6ERZAHL 

0293 INITR C ASSET TEW^CDRDER AN UHD SYNCHMNBYTES LESEN 

0284 INITH CASSETTENRECIMKR AN UND SYNCHRtMYTES AUFZEICNEfl 

1BB3 IHLINA 6IBT '? ' AUS UND ERUACHTET EIN6ABE FINER ZEILE 

0361 INLINE LIEST ZEILE VDN TASTATUR IN I/0-BUFFER 

0B37 INT ERHITTELTE HAECHGT KLEINERE GANZE ZM. 

09GD INTA NANDELT A IN 16-BIT-INTEBER UH INIT SIM) 

2B01 INTEIP AUSDRUCK AUSHERTEN U» ER6EWIS IN INTEGER IttWAHDELN 

1E45 INTEIP AUSDRUCK AUSMERTEN UND BANZZAHLIBEN NERT « 327HD) ERftlTTELN 

0BC7 I5UB INTE6ERSUBTRAKTI0NI Z = Zl - Z2 

099B ITESTI TESTET IHTE6ERZAHL 

IBIO LAR6 ANM.YSIERT ZHEI ARSUHENTE FIER LIST 

09F4 LDIY SPEICHERT KRT UH 
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09FC LDYX SPEIEHEfiT NERT llil 

1E3D LETTER TESTET OB ZEICHEN EIH BUCHSTABE 

OBO? LOB KRECH»I£T NATUERLICHEN LOGARITHHLtS 

lAFS LPRT ZEILENZEISER IN 6ANZEH PRD&ftMINTEn EMEISRH 

IflFC LPNTP ZEILENZEISER TEILNEISE ERNEUERH 

0E6C LVAL UANOELT STRIKB IN ZAHL PASSENDEN TYP5 IM 

09D2 HOVE TftfiNSPORTIERT NERT JEDEN TYP 

09D3 NOVE] ttlE HOVE BEI VERTAUSCHTEN ZEIEERM 

2aBF HRQOH PLATZ FUER STRIW IN STR1H8SPACE HACHEK 

097B NEB MESATIVEH UERT ElKR ZAHL BILDEN 

20F9 mil CR AUS6EBEN. KMf CUROSR NICHT IN POSTIQN 

249F OPERND OPERANDEH FI3ER AUSKUCKSAMLYSE AUSHERTEN 

0033 DUTCH AUS6AM EINES ZEICHENS AUF DEN SILDSCHIHI 

033A DUTCH2 BIBT ZEICKEH AUF DEN BILDSCHIRN AUS 

032A OUTCHF BIBT ZEICHEN AUF BILDSCHIRN, PRINTER ODER CASSETTE AUS 

OA03 PUINTI ERHITTELT I-ADttESSE IN ABHAEHBIKEIT VON TYPX 

0221 PORTCT STEUERT PORT 255D 

13F2 PONER MRECHHET DIE POTENZ EIKR ZAHL 

0374 PRCe CR AUF MtUCKER AUS6EBEN 

003B PRINT AUS6ABE EINES ZEICHENS AUF DEN DRUCKER 

Ci3?C PRINTl ZEICHEN AUF DRUCKER AUSBEBEN 

2eA& PRINTS DRUCKT EIMEN STRINE 

2B75 PRINTT DRUCKT TEXTSTRIN6 

05D1 PRRDY TESTET OB DRUCKER BEREIT 

OFAF PRZlffi ZEILEHHUHHER AUS6EBEN 

0FA7 PRZNRl ' IN ' ZEILEKNUHKR AUS6EBEN 

01D9 PULSE eiBT INHPULS AUF KASSETTE AUS 

OFIB RDIVIO DIVIDIERT REELLE ZAHL DURCH lOD 

0235 READB LIEST BYTE VW CASSETTE 

0241 READBI LIEST BIT VON CASSETTE 

02?6 READS LIEST SYNCHRONISATION 

0314 READN LIEST HRT (LSB, RSB) VON CASSETTE 

149A REIHEl BERECHNET REIHE = CI t Z + C2 I ZII3 + C3 t ZttS 

t4A9 REIHE2 BERECHKT REIHE = CI t C2 t Z * C3 t Zlt2 * C4 t lit] 

021E RESINP SETZT DEN EIBABEPORT BIT 7 VM PWT 255D ZURUECK 

038B RESPR AUSSABE-FLAS AUF DISPLAY UND CR m DRUCKER, «NN DRUCKKOPF NIGHT IN POSITION 

0D97 RLH SPEICHERBEREtCK UN EIN BIT LINKS SCHIEBEN 

0D6A RLHA 8 SPEICHERZELLEN RECHTS SCHIEBEN 

OFOfl RHLTIO HULTIPLIZIERT REELLE ZAHL HIT lOD 

14C9 RND ERZEU5UNB EINER ZUFALL5ZAHL 

0932 RNEB NESATIVEN HERT EINER REELLEN ZAHL BILDEN 

0778 RHULL REELLE ZAHL = 

14F0 RRND REELLE ZUFALLSZAHL ERZEU6EH 

OD90 RRI SPEICHERBEREICH IfH I BIT RECHTS SCHIEBEN 

0955 RTESTX TESTET REELLE ZAHL 

0708 5ADD2 SIN6LEADDITIDN: Z ■ Zt t O.S 

0FS9 SADDA SUNHE BILDEN 

070B SADDC SIN6LEADDT1DN: 2 = C + ZI 

D7I6 SADDY SINBLEADDITION: Z = Z2 + Zl 

OAOC SCPKY SINGLEVERSLEiCH! Zl UND Z2 

0897 SDIVIO SINGLEDIVISDH DURCH lOD 

0BA2 SDIVY SIMLEDIVISIOKi Z > Z2 / Zl 

1F07 SEQL SUCHT ZEILENENDE 

IFOS SEDS SUCHT EHDE DER ANNEISUN6 

098A SSH 6ILDET DIE 5EN-FUNKTIDN EINER Zttl 

1547 SiN SIttUS-FUNKTION BERECHKEN 

OqCB SLDCI SPEICHERT ZAHL ALS KQNSTAHTE 

09B4 SLDKY TRANSPORTIERT SIN6LE ZAHL 

09B1 SLDIYC LAEDT SINBLE-KONSTANTE 

09C2 SLDYC LAEDT KOHSTANTE 

09BF SLDYI TRANSPDRTIERT SIN8LE ZAHL 

tB2C SLIK SUCHT ZEILE IN PRQSRAMTEIT 

07B7 SHADDY SINGLEHAHTISSENADDITIDN 

093E SNLTIO SIN6LEHULTIPLIKATI0N HIT lOD 

0841 StH.TL2 SIKSLEHOLTIPLIKATIDN HIT LD6 t2) 

0847 SHLTY SINSLEHULTIPLIKATION: Z ' Zl t Z2 

09A4 SPUSHK RETTET SIWLE AUF STACK 

13E7 SQR BJLDET DIE WRZEL EINER ZAHL 

07D7 SRYR SCHIEBT SINSLEZAHL UH A BITS RECHTS 

0710 SSUBC S1N6LESUSTRAKTI0N; Z > C - Zl 

0713 SSUBY SIN6LESUBTRAKTIQN: Z = Z2 - Zl 

2857 STEflPS ERHITTELT STRIN8SPACEADRESSE UND LEST SIE IH VDRL. ZNISCHEHSPEICHER AB 

2865 STRC STRIN8K0NSTANTE IN ZHISCHENSPEICHER UND X UEBERNEHHEN 

2iOD SVAR VARIABLE IN TABELLE SUCHEN UND EINRICHTEN, HENN NICHT VDRHANDEN 

15A8 TAN TAMSENS-FUNKTIDN BERECHKEN 

0994 TESTI TESTET ALLE ftJHERISCHEN TYPEH 

25D9 TYPCHK RST 20-UPi TESTET TYP DEB J-REBIBTER INHALTS 

OAEC TYPID TYPX = DOUBLE 

0A9D TYPXI TYPI = INTEGER 
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OAEF TYPIS TYPl » SIItN.E 

OFBS USTR MNHLT ZAHL IN IMFOfWATIEKTEH STRING UH 

02il IIR6TII Wmm ITTE ZKIMAL UJF CASSETTE 

0264 WIITEI SCWEIIT lYTE MIF CASSETTE 

02B7 MITES SCNREIBT SVNCmDMrTES (25S0 t UW Ml 
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) BASIC AWE 15UHGEN UND -FUNKTIONEN 1 
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NACH 
0132 PDINT-flMTIM 
013S SET-AKHEISUNG 
0138 BESET -MK I SUNG 
Oi9D IttXYI-FUKKTIlM 
OIH aS-MWElSWB 
01D3 RAMafl-ANUEISWe 
02B2 SY5TEH-BEFEHL 
0809 LOG-FUKKTION 
0977 ABS-FUWTIM 
098A SSN-FUKKTIW 
0A7F CIHT-FUMCilffll 
OABl CSMe-FlMKTION 
OADB CDR.-FUHKTIDH 
0826 FII-FIMKTIOH 
0B37 IKT-FIMTIOK. 
13E7 SQfi-FUHKTIM 
1439 EJP-FUBKTIOH 
14C9 RM-FUItfTIDH 
1541 COS-FUNKTim 
1547 BIN-FWKTIM 
15AB TAH-FUNKTION 
15BD flTM-FliKTlOU 
1B49 NEH-BEFEHL 
ICAt FOR-AfWElSUNE 
1D91 RESTORE-ANHEISUNB 
IDU END-AWE I SUNG 
ieE4 CaNT-ANUEIBUNG 
m? TRni-AHKlSl»l& 
IDFB TR[^F-AMEISIM6 
lEOO DEFSTR-ANHEIStMB 
1E03 DEFINT-AHHEISWe 
lEOi DEFGHB-AHKISL^ 
1E09 SEFDBL-ANHEISUHG 
1E7A CLEAfi'ANKISUNG 
iEA3 RltN-ANKlSUNe 
lEIl 6D5UB-AWEISUW 
1EC2 GQTO-ANHEIStMG 
IEEE RETURN-ANUEISUKG 
1F05 DATA-ANHEISIMG 
1F07 ELSE-AWE I SIM 
1F21 LET-ANKISIMB 
1F6C DN-ANKISUMGEN 
IFftF RESUnE-ftWElSUKS 
200B AUTD-BEFEH. 
2039 IF-MMEISUNG 
2067 LPBIHT-AWIEISUHG 
206F PRINT-AHNEISUNG 
21 9A INPUT-ANUEISUNG 
21EF READ 

22B6 NEK T-ANHEI SUNG 
24CF ERR-FlrtKTIOH 
24DD ERL-FUHKTION 
24EB VARPTR-FONKTIOH 
2608 DIH-ANVEISUKG 
27C9 MEH-FUNKTION 
27D4 FRE-FUMKTlOtl 
27F5 PDS-FUttKTION 
27FE USR-FUIKTHM 
2836 STRt-FUM(T]M 
2A03 LEN-FUKKTIW 
2A0f ASC-FUI«TION 
2A1F CHRI-FIMTIW 
2A2F STRINGI-FUNKTIEM 
2A61 LEFTt-FUNKTIQN 
2A91 RIGHTt-FUNKTIQN 
2ft9ft ni»^=llHt!TlM 
2AC5 VAL-FUUKTIW 
2AEF INP-FUNKTION 
2AFB HIT-AWE I SWe 
2B29 LLIST-BEFEHL 
262E LIST-BEFEHL 



ADKSSEN SIRTIERT 
ERNITTELT, OB GRAPHIKPUNKT GESETH 1ST 
SETZT GRAPHIKPWKT 
LOESCHT BRAPKIKPUNKT 
TASTATURA6FRA&E QHK PRffiRMflSTDP 
BllSSCHlRn KIRS BELOEStHT 
INITIALISIERUNG DES ZUFALLSZAHLEKGENERATORS 
LIEST SYSTEM-TAPES IMD STARTET SIE 
BERECWET NATUERLICHEN LQGAftlTHfWS 
ABSOLUT KRT EINEfi lAHL BILDEH 
BILDET DIE S6N-FUIKTI0II EINER ZAHL 
HAHDELT ZAHL IN 16-BIT INTEGER UH 
WMSELT ZAHL IN SINGLE tlN 
ZAHL IN DQUH-E UWAKDELN 
INT DHNE BERUECKSICHTIBUNG DES VQRZEICKEHS 
ERRITTELTE MECHST KLEIKERE 6ANZE ZAHL 
BILDET SIE UURZEL EINER ZAHL 
EUPONEHTIALFWKTIOH ElMER ZAHL BESTINHEH 
EfiZEUGUNG EINER 2UFALLSZAHL 
CaSINUS-FlHKTION BERECHKN 
SimS-FUIKTICBt BEKCHKH 
TAN6ENS-FUNKTIHI BERECHKN 
f^USTMSENS-FUNKTION 6CRECHWN 

ALLES LOESCHEN (DIE STRINeSPACEDEFINITIM BLEIBT ERHALTEN) 
HIEKRtiQLUNfiSANKISUNG 
DATAZEIGER ZURUEUSETZEN 
BEENDIGUN6 DER PROGRMNAUSFUEHRlMe 

HIEDERAlff'NAHHE DER PRDBRAHNAUSFUEHRUNG HACH BREAK ODER ERROR 
IRACE-FUWTIDN AR 
TRACE-FUNKTION AUS 
STRINGVARIABLEN DEFINIEREN 
INTEGERVARIABLEH DEFIHIEREH 
SINGLEVARIABLEN DEFINIEREN 
DOUBLEVARI ABLER DEFINIEREN 
VAf)IAR.EN LOESCHEN UND STRIHGSPACE DEFINIEREN 

fmmm starten 

UNTERPROGRAIfflAilFRUF 

UNDEDINGTER SPRUNG 

RUECKSPRUNG VON UNTERPRDGRANtl 

SUCHT ENDE DER ANHEiSltHG 

SUCHT ZEILEKNDE 

KRTZUHEISIING 

V^RZHEISUNGS-ANtKISUNGEN- 

RllECK5PitUN6 VtM EiHtfft-TR»> 

AUTMATISCHE ZE1LENNUKIERIERUH6 

BEDIN&TE ANUEISW6 

AUSGABE MF DRUCKER 

AUSGABE AUF BILSSCHIRfl 

EINGA8E-AWE1SW6 

DATEN AUS PDOGRMDTEXT LESEN 

ttIEDERH0LUH6SAM£ISUNe BEI FDR-NEIT-SDIEIFE 

ER6IBT DEN LETZEN FEHLERCQDE 

ERGIBT LETZTE FEHLEBZEILE 

ERGIBT VAfilABLENADRESSE IN VARTA6 

FELDER EINRICHTEN 

ERGIBT GfiOESSE DES FREIEH SPEICKRS 

ERGIBT GRQES5E DES FREIEH SPEICHEftS OIKR DER Fi%IEN 5TRINSSPACE 

ERGIBT CURSORPOSITON 

RUFT MSCHttENPROGfiMnE ftUF 

ZAHL IN STRII^ tINFORKN 

ERGIBT LAENGE EINES STRINGS 

ERGIBT ASCII-CODE DES ERGTEH ZEICHENS EINES STRINGS 

EfiZEUGT 1-BYTE STRING HIT ZEICHEN DESHN ASCII-CODE DEN AR6UNENT ENTSPRICHT 

ERZEUGT STRIN6 AlfS N GLEICKEN ZEICHEH 

LINKEN TEIL EINES STRIH6S ABTRENNEN 

TRENNT RECHTEN TEIL EINES STRINGS AB 

miTLEREH TEIL EINES STRINGS ABTREWtEH 

STRING IN ZAa UNNANDELN 

EINGABPQRT LESEN 

UERT AUF AU56ABEPDRT AUS6EBEN 

PROBRANNLISTING AUF ORUCKER 

PRDGRAnriLISTING AUF BILDSCHIRH 
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2BCi DaETE-BEFEHL 
2BF5 CSflVE-KFEHL 
2C1F aOAD-BEFEHL 
Kflfl PEEK-FMTIDH 
2CB1 PDKE-A1MEISUK6 
TCiJi USIK-AMtEISUNe 
2£iO EBIT-BEFEHl 



PR06RANHZEILEN LQESCHEH 
f^mttm AUF CASSETTE AUFZEICHNEN 
PR06RMH VON CASSETTE LADEK 
INHAIT ElKR SPEICKERZELLE LADEH- 
UERT IN SPEIUCRZELLE SCHSEIBEK 
FORHATIERTE Al)S6ABE 
2EILENEDITQR FUER Pf!D6RANnZElLEK 



ALPHABETISCH SORTIERT 



0977 ABS-FUNKTION ABSOLUT NERT EINER ZAHL BllDEN 

2A0F ASC-FUNKTIM ERGIBT ASCII-CODE D£S ERSTEN ZEICH£MS EINES STRINGS 

15BII ATN-FUNTTIW ARCUSTANBENS-FUNKTION KRECMEN 

200B AUT0-6EFEHL AUTOHATISCHE ZEILENtMtEttlERUNG 

OADB CDBL-FWKTIM ZAHL IN H9UBLE IMtANDELH 

2ftlF CHa$-FUHKTHW WIEU6T 1-BfTE STR1B6 HIT ZElDffiN ffiSSEN flSCH-CODE BEil ARKIWMT EITTSPRICHT 

0A7F CINT-FUNKTIDK MANBELT ZAItL IN 16-BIT INTEGER UH 

1E7A ClEAR-ANKEISUNe VARIA6LEN LKSCHEN UNB STRIH6SPACE DEFINIEREN 

2C1F CLOflD-BEFEHL PfiOSRflHN VON CASSETTE LADEN 

01C9 CLS-ANNEISUNB BILBSCHIRfl NIRD BELOESCHT 

tDE4 CONT-ANHEIBUNG NIEDERAUFNAHf^ DER PROeRAflWHtSFUEHRUHS NACH BREAK ODER ERROR 

S5A1 COS-flWKTIOH COSIXUS-FIMRTIQH BERECHKH 

26FS CSAVE-BEFEHL PRDGRAm AUF CASSETTE AUFZEICHNEN 

OABi CSKO-FiMKTIDN NANDELT ZAHL IN SINGLE UN 

1F05 DATA-ANWISUN6 BUCHT ENDE DER ANNEISUNS 

1E09 DEFDBI-ANHEISUN6 DDUBLEVAAIABLEN DEFINIEREN 

1E03 DEFINT-ANNEISUN6 INTEBERVARIABLEN DEFINIEREN 

lE<tb DEFSH6-AHtt£ISUH6 5I)I6LEV(^IA9LEN DEFINIEREN 

lEOO DEFSTft-ANMEISUNB STRIHGVARIABLEN I£FINiEI^ 

26Ci DELETE-BEFEHL PR06RAMZEILEH LOESCHEN 

2608 DIH-ANKEISUNe FELDER EINRICHTEN 

:E60 EDIT-BEFEKL ZEILEHEDITDR FUER PR06RWMZEILEN 

1F07 ELSE-ANNE I SUNE SUCHT ZEILENENDE 

im. ENO-ftHNEISUHB BEEWISIW6 QER PR«RWfflftUSFUEHftlWfi 

24DD ERL-FUNJtTION EfifilBT LETZTE FEHLERIEILE 

24CF EftR-FlMTION EfiBIBT DEN LETZEN FEtfl-ERCOUE 

1439 EIP-FIiM:TION EXPOI£NTIALFUKKTION finer ZAHL BESTIHHEN 

0B2f> FII-F1M»::TIDN INT OHNE BERieCKSICHTISlMG DE5 V0R7EICHENS 

ICAl FDR-ANHEISUNG ttlEDERHOLlMSANNEISUNB 

27D4 FRE-ftlHtTI* WSIBT SMESSE DES FREIEN SPEICHERS QQER DE8 FREIEN STRIWSPME . 

lEBl BOSUB-ANHEISUNO ONTERPROBRAimAlffRUF 

1EC2 GOTD-ANNEISUNB UNBEDIH6TER SPRIMS 

2039 IF'ANNEISUNG BEDIHGTE AWEISIM6 

019D INKEYI-FUNKTION TASTATURABFftASE OHNE PROWAWISTDP 

2AEF INP-FUWTIDK EINGABPORT LESEN 

219A INPUT-AW£ISUN6 EINBABE-ANHEISUNB 

0B37 INT-FlfNKTION EfiNlTTELTE NAECHST KLEIICRE BANZE ZAHL 

2A61 LEFTt-FUNKTICK LINKEN TEIL EINES STRIMS ABTREIttEN 

2fii)3 LEN-FUNKTION ERGIBT LAENBE EINES STRIN6S 

iF21 LET-ANKISUNS NERTZUNEISUNB 

2B2E LIST-BEFEHL PROBfiftflNLISTINB AUF BILDSCHIW) 

2B29 LLIST-BEFEHL PfiOGRAMWLI STING AUF WUCKER 

0809 LO6-FUNKTI0N BEREC»NET NATUERLICHEN L06ARITW1US 

2067 LPftlXT-ANNEISUNB AUS6ABE AUF DftUCKER 

27C9 Kn-FIMTIDN ERBIBT BfiOESSE DES FREIEN SPEICHERS 

2A9« NIDI-FUNKTION HITTLEREN TEIL EINES STR1K6S ABTRENHEN 

1649 NEN-EEFEHL ALLES LOESCHEN (DIE STRIN65FACEDFINITIQN BLEIBT ERHALTENI 

22B6 NEU-ANHEISUNG ttlEDERHDlUMSANNEISUMG BEI FDRHfEXT-SCHLEIFE 

IHZ DN-ANNEISUNBEN VENZNEieUNBS-ANNEISUMEN 

2AFB QUT-ANVEISUNG NERT AUF AUS6ABEP0RT AUSGEBEH 

2CAA PEEK-FUtfKTION INHALT EiNER SPEICHERZELLE LAMH 

01J2 POiNT-FUNKTlON EfiHiTTELT, OB BRAPHIKPIMT 6EKTIT 1ST 

2CB1 POKE-ANNEISUNG NERT IN SPEICHERZELLE SCHREIBER 

27F5 POS-FUNKTION ERBIBT CURSOfiPOSITON 

2m PRIHT-MNEISUNB ftUSBABE ftOF BILDSCHIW 

0ID3 RANDOH-AVKISUNG INITIALISIERUHG DES ZUF ALLS ZAHL EN SENEMTORS 

21EF READ DATEN AUB PROBRMITEXT LESEN 

0138 RESET-ANNE ISUN6 L0E5CKT GRAPHIKPUNKT 

1091 REST0RE-ANMEISUM6 DATAZEI^R ZURUECKSETZEN 

IFAF RESUHE-AMEISUNB RUECK3PRUN6 VOM ERRW-TRAP 

lESE RETURH-AWElSmie RUECX3T>»M6 VON UNTEWftOSftAMt 

2A91 RISNTt-FUNKTION TRENNT RECHTEN TEIL EINES STRIPS AB 

14C9 RND-^UWTION ERZEUBUN6 EINER ZUFALLSZAHL 

1EA3 RUN-ANtfEISUNG PROBRANN STi^TEN 

013S 3ET-ANNEISUNB 5ETZT BftAPHIKPUNKT 

098A SBN-FtlNKTIOtt 8ILDET DIE S6N-F1MTIDN EINER ZAHL 

15*7 SIH-FIMTION SIHUS-FU»KT1» KfiEtHHEH 

I3E7 SQfl-FUNKTION BILDET DIE ItURZEL EINER ZAHL 

2S3& STRt-FUNKTION ZAHL IN STRING UHFORHEN 
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2A2F STRINet-FUNKTIQN ERZElffiT BTRIHG AUS N 6LE1CHEN ZEICHEN 

0:B2 SYSTEH-BEFEHL LIEST SYSTEH-TflPES tW STMTET SfE 

I5AB TAN-FUNKTIOH TH6ENS-FIMKTIDH KRECHKH 

IKi TMJFF-MMEISUW TRACE-FtM;TIW AUS 

1IIF7 TR0H-«WE1BIM TRACE-FUNKTlffil AN 

2CBD USINS-AMIEISUKe FMHATIERTE AUSHBE 

27FE USR-FUHKTItM RUFT MSCHIHEIIPR06(tANffi AlF 

2AC5 VAL-FUWTIDH STRIKE IN ZUl UHHNDELN 

2«B yftWTR-FlBKIiai ERSIBT VftRIflBLEHftMttSSE IK tmn 
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t Alf ZEICHMJMSFWHATE AUF CASSETTE t 
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JEKS BIT AUF CASSETTE BESTEHT AUS MINDESTEHS EIMEH TAKTIHPULS UHD EIHEH KITEREH INPULS RJER JEDE5 H-BIT. 
1 BYTE MIRD BIT-SERIEU BE&IWIEHD HIT DEH HOECHSTUERTISSTEN BIT AUF CASSETTE AUFBEZEICHNET. 

SYSTEKFILES: 

VDRSPANH (255D MLLBYTES) 
SYHCHRQNISATIOK (A3) 
FILEMWBLOCr: FILENAKHEADEA IS5) 

6 BYTES FILENAIE 
H HTENBLKCKEi MTAHEA9ER (3CI 

BLOCKIAEKE I1-2UD, ENTSPRICHT 3US) 

BLOCKANFAHSSADRESSE (LSB/ttSII 

MIEW^TES 

S-BIT-nmEFSUmE ieber blockamfaksabresse unb alle oatenbytes 

ENTRYroiNTBLOHi ENTRYPOIHTISADERCOH 178) 

EKTBYPOIHT (LSB/«SB) 
(VDR JEPEIt BLOCK KQENNEN BELIEBIS VIELE BYTES EINGEFtlEST KERBEN, BIE BEIH lESEN I6N0RIERT UERDEN.) 

BASICFILESi 

VORSPAM (25SD MULLBYTES) 

SYHCWQlimTIOH tK> 

FILEHAHEWABER (3 t S3I 

FILEMAHE (1 BYTE) 

BASIE^'RDBftAm lUIE IN SPEICHER, EIHSCHLIESSLICH OOOO-ZEILENZEIGER) 

(VH DEH FILENMEHEABER KOEMNEN BELIEfilG VIELE BYTES EIH6EFUEeT HRDEN, DIE BEIH LE5EN ISNORIERT NERDEHJ 
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tmtiimitmiuMm 

t VIDEO-fiENIE E6 3W5 t 

tmititfttmHttiim 

(ZUSATZ im TRS-BO-RM-IISTIK) 



If) FOLGENKN S!KD ALLE AEHKWN6EII, Hi IK VIKD-BEKIE E6 3003 6E6EMJEBER KR HMPTVERSION VDRGEffiHREM HURDEH, 
ZUSMENKSraLT. DIE BEMHERTEK 8YTES SIM WRCH EIR '>' 6EKEIHZEICHHET. 

AUSSERDEH 1ST Vi KACHTEH, SAS8 KIN VIDED-BERIE ZKI EIN-ZMSSABE-AORESSEII VON 8PEICHER- AUF PDRTMHtESSEK 
UHBELEeT WRKR SIRDt 

1) DRUCKERADRESSE VON 37EB NACH FB 

2) KASSETTENfKKDRKRANHAHL VON 37E4 NACH FE. 



TEITE 

ei03>S2 49>41>44>39>24>00}M>M>00>O0 » REABT 

0111>OD>0D>OB>OI>O9>OI>O0>«S>OS>«fl>OB>0B>0D>OD>0!)>OD 

0121>00>0&>OI>«>OB>«>OB>M>OB>«I 09 H 

0212>D3>FE OUT (FE},A )CASHTTE SaECT LATCH BETZEN 

02i4>M NOP 



0471 FE 40 
0473>18 08 






40 
0470 



jBUQfSTABE? 

iSPRWe HIRB IMER (!) AUSOEFUEMIT 



03A»00 
03AE>D3>FD 



03BB>00 
03BC>D3>FS 



MP 
OUT 



NOP 
OUT 



(FBI, A 
<FD),A 



;AUS6EIEN 
)AtiSGE8EN 



»B1>00 
03B2>BB>FB 



NOP 
IN 



A,<FD) ;BRUCKER8TATUS LA9EN 

iSE? 43 4E 4£ 32 32 37 33 43 4D 4F H 44>33>4E CNNRRIHIEHDFBSN 



ISBH 



